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Preface 


This | manual is one of a series designed to instruct the 
programmer in the use of the SPERRY Operating System/3 
(OS/3). Specifically, this manual describes the OS/3 RPG II editor 
and its effective use. The intended audience is the novice 
programmer who has little knowledge in data processing or the 
more experienced programmer who may or may not be familiar 
with the RPG Il editor. 

This manual comprises: 

m Section 1. Introduction 


Explains what the RPG Il editor is, what it’s used for, and — 
how it operates with the general editor. 


m Section 2. Using the RPG II Editor 
Describes how to activate and terminate the RPG Il editor. 
= Section 3. Creating an RPG Il Source Program 


Explains how to create RPG Il source programs using the 
RPG Il editor’s display formats. 


m Section 4. Updating an RPG Il Source Program 
Explains how to update RPG Il source programs by using 
both the RPG II editor’s display formats and commands and 
EDT commands. 


= Section 5. Error Detection and Recovery 


Describes the types of errors that may occur during an RPG 
ll editor session. 


m Appendixes 
Contain the specification screens in positional, formatted, 


and free-form display formats; a table summarizing the EDT 
commands; and a table summarizing directives. 
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The current version of the following manuals are helpful to the 
- RPG Il user in the System 80 environment: 


w OS/3 General Editor (EDT) User Guide/Programmer 
Reference, UP-9976 


Describes the functions of the general editor commands and 
how to use them. 


m Interactive Services Commands and “Facilities User 
Guide/Programmer Reference, UP-9972 


Describes the commands and operating procedures for 
‘workstation terminals in the interactive services environment. . 
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1. Introduction 


1.1, WHAT IS THE RPG Il EDITOR? 


Specialized language 
editor 


EDT overview 


EDT functions 


Using the work-space 
file 


The SPERRY Operating System/3 (OS/3) Report Program 
Generator Il (RPG ll) editor is a specialized language (subeditor) 
editor of the OS/3 general editor (EDT) used to create and 
update RPG Il source programs interactively from a workstation. 
Because it is a subeditor of EDT, the RPG Il editor uses many 
EDT facilities, as well as its own, when creating and updating 
programs. Using the RPG Il editor enables you to receive prompt 
screens and immediate syntax checking, which are helpful when . 
either creating or updating your program. In addition to the RPG I 
editor, EDT provides you with a feature known as screen mode 
processing, whereby an RPG Il template screen is displayed for- 


_ your input. Screen mode processing does not provide syntax 


checking but it is useful when making minor corrections to an 
existing program. 


You must be familiar with EDT before you can use the RPG ll 
editor. For convenience, a brief overview of EDT is provided 
here; however, you should see the OS/3 general editor user 
guide/programmer reference, UP-8828 (current version) for a 
complete discussion of EDT. 


The OS/3 general editor is a user-oriented interactive program 
used to create and update library modules and data files from a 
workstation. EDT enables you to add to, delete from, and modify 
the contents of your files. 


EDT works with your files in a temporary disk file called the 
work-space file. Each time EDT is initiated, the file is created and 
lasts for the duration of the EDT session. When you read or 
enter RPG Il source statements or data into the work-space file, 
they are automatically assigned temporary line numbers. You use 
these line numbers similar to the sequence numbers on the RPG II 
coding forms (columns 1-5) to reference and manipulate 
statements in your program during an EDT session. 
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The work-space file can hold only one program or data file at a time. 


. Therefore, the content of the work-space file must be saved on disk 


or diskette before the RPG II editor is terminated or another file is 
created or read from disk; otherwise, the content of the work-space 
file will be lost 


To create an RPG II program, enter source statements into the work- 
space file one at a time. When the program is completed, you can 
store the new program in a SAT file on either disk or format label 
diskette. You may also list the file on the printer or punch it on 
cards. Figure 1-1 summarizes this procedure. 


To update an existing program, you must read the program from the 
program library to place a copy in the work-space file. You then do 
all the updating with the work-space copy. When the updating is 
completed, you can either overwrite the original library version with 
the work-space version or store the work-space version in a new 
file. You can also list the file on the printer or punch it on cards. 
Figure 1-2 summarizes this procedure. 


1.2. COMMAND CONVENTIONS 


Commands and parameters 


Abbreviated commands 


User-defined variables 
Optional parameters 


User entries 


Defauit vaiues 


The conventions used to illustrate the commands presented in this _ 
manual are: 















Commands and parameters in capital letters 
must be keyed in exactly as shown. 





Underscoring indicates commands may be 
abbreviated; only the underscored 
characters are required as keyins. 






Parameters constructed in lowercase letters 
designate user-defined variables. 





@PRINT Llise-raege] . Optional parameters are enciesed in 
Cae “OTE brackets. 






FIeLo wawe: PRUTSEY . = 


SELECT mODE (©): 


User entries are identified by reverse type. 


Default values automatically generated by 
the RPG Il editor are enclosed in 
parentheses and shaded. (See 2.2.) 
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RPG I! programs must be written to SAT files to be compiled. 


Figure 1-1. Creating an RPG ii Program 





“RPG If programs must be written to SAT fires to be compired. 


Figure 1-2. Updating an RPG Il Program 
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1.3. WORKSTATION CONSIDERATIONS 


LOGON menu 





Protected fields are 
unalterable 


Unprotected fieids 
are used for ertries 


Keys that move 
the cursor 





Logon 


Since the RPG I! editor is an interactive program, 
you access it via the workstation. If you are the 
first user, turn on the workstation and then log 
on by using one of the following procedures: 


The logon (and logoff procedures are described in | 
full detail in the interactive services commands 
and facilities user guide, UP-9972 (current 
version). 


Screen Display 


Screens displayed by the RPG II editor contain . 
protected and unprotected fields. The protected 
fields are unaherable fieids. 


Emries may be made in unprotected fields. When 
an entry is made in an unprotected field on the. 
screen, the underscores are replaced by the 
entry. If the entry does not completely fill the 
fieid, the emry is padded with blank spaces ~ 
where the underscores are. This is helpful to 
show whether an entry is left-justified or 
right-justified within the field. 


Moving the Cursor 


During an RPG Il editor session, the cursor can be 
repositioned on the workstation screen by 
pressing any of the following workstation keys: 


B Tab keys (to tab forward and tab backward) 
ry Cursor scan keys [=| [=| [V] 
s Space bar (to type a space) | 

rT Cursor-to-home key (to reposition the 


cursor to the top left comer of the 
workstation screen} 
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2. Using the RPG Il Editor 


2.1. ACTIVATING THE RPG il EDITOR 


Using the RPG Il 
editor with EDT 


Activating beth 
EDT and the 
RPG I! editor 


Because the RPG II editor is actually a specialized language editor 
(subeditor) of EDT, the RPG II editor can be used only while EDT 
is activated. 


if EDT is not already activated, activate both EDT and RPG Il 
editor by keying in: 


EDT A@RPG 
If you are already in an EDT session, you key in: 


@RPG 


2.2. INITIAL DISPLAY 


First workstation 
sereen 


Once the RPG II editor is activated, the first workstation screen 
you see is the initial display. This screen identifies the release 
level and version number of the RPG Il editor that you are using. 
You also use this screen to select the starting conditions for your 
RPG li editor session. 
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INITIAL DISPLAY 


RPGEDT VERSION XX.XX/XX 
SELECT MODE 

€ = CREATE =—-U =» UPDATE 
SELECT FORMAT TYPE . GD 

1 = POSITIONAL «©2 = FORMATTED «= 3. =: FREEFORN 
SPECIFICATION TYPE DISPLAY? GD Y= YES N= m0 






Use this screen to specify: 


1. whether the RPG Il editor will be used to create or update an. 
RPG Il source program; , 


2. which display format will be used to display the specification 
screens; and 
whether the SPECIFICATION TYPE DISPLAY will be displayed 


next to show you the types of screens available with the RPG Ii 
editor. 





No entries need to be specified if you want to use the following 
default values: : : 


= create mode; 

BS positional format; and 

B® no specification type display. 

Select all the default values by moving the cursor past the N that is 


displayed and then pressing the transmit (XMIT) key. After the 
screen is transmitted, a header specification screen is displayed. 
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Used to create 
Program statements 
Keyin C on the 
initial display 


Used to update 
program statements 


Keyin U on the 
initial display 


Available formats 
for specification 
$creens 
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Selecting Create Mode 


Select create mode on the initial display 
when you want to create a new RPG Il 
source program. To select create mode, 
move the cursor past the displayed C to 
the next unprotected field. Create mode 
(being the default value) is automatically 
selected for you. Remember, the cursor - 
may be moved by pressing the tab key or 
tne appropriate cursor scan keys. 


Selecting Update Mode 


Select update mode (command mode) on 
the initial display when you want to 
update an existing RPG li source 
program. To select update mode, key in U 
over the displayed C on the initial display. 





Selecting a Format Type 


The RPG I! editor gives you the option of selecting any one of three" 
formats in which to display your specification screens. 
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Key in 1, 2. or 3 


Duration of use 


Available 


Template format 


Shows field narnes and 
starting column positions 


Tabular format 


Shows starting 
colurnn pesitions 
only 
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You select a format type by keying in its number: 1, 2, or 3. Because 
1 is the default value, you may select that just by moving the cursor 


to the next unprotected field. 


Once you select a format, it will be used for all specification screens 
until a different format is selected with an @FORMAT command. 
(See 4.2 for instructions.) 


Appendix A contains all the available specification screens in 
formatted, positional, and free-form formats. 


FORMATTED FORMAT 
HEADER SPECIFICATION SCREEN 







iat - 














SEQUENCE suBRER: 6 Sten TyPe 8 


7 COMPILATION BODE: _ 8 ERese dune: 3. GPERATGOR ComT2gu: _ 


aebus: | 18 





cuRnency Symset: _ 





26 
ae 
4 





IBVERTED Paret: ALTSEQ: | 










SeMaRky SEARCH: _ StGm maporige: 





FORMS ALIGEEEST: | 





wworcaTOR miT.: 









FILE Taawslation: 







7 





6 COA MABE: 


~ 
ca 


Suseouring: _ 7S peoceae 18: 


cee 


















REXT SPECHFICATION TYPE. ST. OF CHD: { } 











eee ewwoeeer oes: SR OS SSP OES COO ETE TESS BERT ese Tweens 


28 w 0 eee Saree ee wenn te wee cence eee es ete 


The formatted format is a template display format 
designed for the novice user. When a specification 
screen is displayed in this format, each new field on 
the specification screen is labeled by its name and 
beginning column number. There is a different 
screen for each specification type. 


POSITIONAL FORMAT 
HEADER SPECFICATION SCREEN 












Lime - 4.008 


B1l223 46667 77 
1 eT se se 1erer23¢ 4s 
eonee Hie ee ww ww 8 ew ww meee oe ewe wee 


WEXT SPESIF( SATION TYPE. ST. 68 CMO: 6) 


owe orn oo 0 oo 0 00 0 ow 0 or 2 8 Bown orem ew ew ere eee eet ow ee ee ewes ee res 


The positional format is a tabular display format 
designed mainty for the experienced user. When a 
specification screen is displayed in positional 
format, each new field on the specification screen is 
identified by its beginning column number. There is 
a c+ferent screen for each specification type. 
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FREE-FORM FORMAT 
SPECIFICATION SCREEN 










emt 
2 3 a $ ty 
1234656 789012348567896323456789012245679902234567890123465678901236 


1.scoes & 














$678901236567898223456789012345678963236567990223456739812345678 


meee ewe wonw owe eoeww en cen ewoes cece wees cee ewoneneons cesses ae 


BEXT SPECIFICATION TYPE. ST. OR CMO: { ) 











The free-form format is a display format also ~ 
designed for the experienced user. It is a 2-line (64 
characters/line) format composed of 128 column 
numbers with an underline under each for data to 
be keyed in. The same screen is used for all! 
specification types. 















You also select a free-form screen to enter data or comments when 
using positional or formatted format. | 


Selecting the Specification Type Display 








The third question on the initial display 
asks whether you want to see the 
specification type display immediately 
after the initial display. You select N if you 
don’t want to see the specification type 
display by moving the cursor past the 
displayed N (the default value); or you 
select Y (by keying in Y over the displayed 
N) if you want to see the display. 





eects eregeme eave 
sence? ues tt) 

# = covets .: omer 
MAeet seubet Frey a 
Te 
Oe, ee ee 
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{_] | SPECIFICATION TYPE DISPLAY 
aia 














ESTER SPHCIEr Cation TYPE: 





eres SPECIFICATION TYPES “%°°* 

@ = nesses F = $MPUT FIELD A = ALTSEQ 
Fo- FTE C = CALCULATION FT = “FILES 
€ - EXTERSI OR Oa = OUTPUT FILE _ EQ = SEQUATE 
L = &66€ CoeBTER OF - OUTPUT FIELD FF < FREE FORM/ 
12 = jaeuT etcoro =f = TELECOMMUBICATION COMMENTS 
AB ~ aute REPORT AC = AUTO REPORT (/COPY) °° = TABLE/ARSAY 

ertieas : OELIMITER 








The specification type display lists all the types of 
screens the RPG Il editor provides for you to use 

when creating an RPG Il source program. Table 2-1 | 
lists the use of each type of display. 


When the specification type display is displayed immediately after 
the initial display, you may key in an entry in the provided 
underlines, or leave the field blank and then move the cursor to the 
bottom of the screen and press the transmit key. If you leave the. 
field blank, the header specification screen will be displayed next. 
Otherwise, the type of screen you specified will be displayed. 


NOTE: 


You may request to see the specification type display periodically 
throughout an RPG If editor session. In this case, when the display 
is presented, you may specify the next screen by keying in the 
appropriate abbreviation in the provided underlines and then 
transmitting the selection. 


Transmitting the Initial Display Selections 


Once you make ail! your selections on the initial display, make sure 
they are correct. If you want to change any of them, you may do so 
at this time by positioning the cursor over the selections you want to 
change and then keying in the new selections. When your 
selections are ccrrect, move the cursor to the bottom of the 
workstation screen (past the last selection on the initial display). 
Then press the trensmit key (XMIT) to transfer your selections to the 
RPG Il editor. 
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Table 2-1. Uses for RPG Il Editor Screens 


To enter a control specification in your 
program 





FILE To enter a file specification in your 
program - 

EXTENSION To enter a file extension specification in 
your program 

UNE COUNTER To enter a line coumer specification in 
your program 

INPUT RECORD To enter the first 42 columns of an input 
specification in your program 

INPUT FIELD To enter columns 1-5 and 43-70 of an 
input specification in your program 

CALCULATION To enter a caicuiation specification in 
your program 

OUTPUT FILE To enter the first 31 columns of an 
output specification in your program 

OUTPUT FIELD To emer columns 1~5 and 23-70 of an 
output specification in your program 

TELECOMMUNICATION To enter a telecommunication 
specification in your program 

AUTO REPORT To enter an auto. report option 
specification in your program 

AUTO REPORT To enter auto report (/COPY) 

(/COPY) Statements in your program 

TABLE/ARRAY To input data to your program in a table 

DELIMITER or array 

ALTSEQ To use an alternate collating sequence | in 
your program 

“FILES To input file transiation table records 
for ail files in your program 

*EQUATE To input file translation table records 
for selected files in your program 

FREE-FORM/ To inciude data, comments, RPG It 

COMMENTS compiler directives, or any source 
statements in your program 

NOTES: 


1. 


When * (TABLE/ARRAY DEUMITER) is selected on the specification type display, °° is 
automatically placed in the work-space file to designate the subsequent entries as data. 
Free-form screens are then displayed for you to enter data. 


For more information on where to enter RPG Il statements and data on these screens, see 
the corresponding topic in the OS/3 RPG Il user guide, UP-8067 (current version). 


The RPG Il ednor cannot be used to enter an ‘&’ option in a /COPY modifier staternent for 
a file description specification. To do this, you must terminate the RPG Il editor with 
G@APG END and enter the statement using EDT. 


« 


27 
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The Next Display after the Initial Display 


The type of screen that is displayed after the initial display depends 
on the entries you made on the initial display. The possibilities for 
the next display and the kind of entry you can make on it are as 
follows: 


specification 
screen 


Free-form 
specification 
screen 


Work-space 
line number 


1.0000 


Specification | 


type display 


Specification 
type display 


Key in source 
Statement. 


Key in source 
Statement. 


Key in 
EDT command. 


Place cursor at 
bottom of screen 
and transmit. Key 
in source statement 
on next screen. 


Place cursor at 
bottom of screen 
and transmit. Key 
in EDT command on 
line 1.0000. 





uP-9981 


SPERRY OS/3 2-97 
REPORT PROGRAM GENERATOR il (RPG I) EDITOR 


2.3. TERMINATING THE RPG Il EDITOR 


Retuming to 
update mode 


Keyin choices 


 @RPG END 


@HALT 


You can terminate the RPG II editor by returning to update mode and 
keying in either of the following commands to the right of the 
current work-space line number: 






Key in @RPG END to terminate the RPG 1] editor but, 
not EDT. 









= 29. s00e> BR 


Key in @HALT to terminate RPG Il editor and EDT. 
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3. Creating an RPG II Source Program 
(Create Mode) 


3.1. USING FORMATTED FORMAT 


Selecting Formatted Format 


If you want to create an RPG I! program 


initial display using the formatted format, you must 
required — - select C and 2 on the initial display. You 
chr 2| may also select N or Y depending on 
cpeninal whether or not you want to see a list of 


the specification types. The first 
Specification screen displayed after the 
initial display (other than the specification 
type display) is always a header 
specification screen when in create 
mode. 


na 


__ The first specification 
screen 





Filling in a Formatted Screen 


When any specification screen is first 
displayed, the cursor is in the top left 
corner of the screen. At this time, you may 
position the cursor over the line number in 
the top right corner of the screen to 
change the line number, if necessary. To 
change the line number, you key in the 
new line number over the existing one. 
(The current work-space line number can 
be a number between 0.0001 and 


Positioning the cursor 


Changing the line number 





9999.9999.) 
Advancing the disor After the line number is set, you must then advance the cursor to 
the field on the specification screen where you want to enter your 
Keying in the statement. You may then key in your statement on the appropriate 
staternent underlines. Remember, to advance the cursor from field to field (if 


it doesn't automatically advance to the correct field), press the tab 
key, space bar, or the appropriate cursor scan keys. 
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After you finish keying in your statement, check it over for errors. If 


"you want to change any input, reposition the cursor to the field you 


want to change and then key in the new entry. When the statement 
is correct, move the cursor to the next screen identification line: 


MEXT SPECIFICATION TYPE, ST. OR CuD: (2) 


Here, you specify what is to be displayed next. You have four 
choices: -_ 








The entry for this option is one specitication type 
adorevaeton (Table 2--1). 


Next work-space line number with RPG H editor in 
EDT command mode 










New specification screen of the same type 


No entry for this option. Place cursor at bottom of 
screen and transmit. 


UP-9981 


Transmitting the 
completed screen 


XMIT 


Transmitting the last 
source statement 


Uses for a free-form 


Selecting specification 
type FF 


Specification screen 
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Transmitting the Screen 


After you make your choice, press the transmit (XMIT) key. This 
enters your source statement in the work-space file and tells the 
RPG I! editor what to display next. Continue filling in the screens 
and transmitting them until all of your source statements are keyed 
in. Key in CMD on the next screen identification line of the 
specification containing your last source statement. This places the 
RPG Il editor in the update mode (EDT command mode) so you can © 
store your program in a program library, list it on the printer, display 
it on the workstation screen, or alter it. : 


Temporarily Changing to Free-Form Format 


When using the formatted format type, you may occasionally need a 
free-form screen to enter a comment, data, RPG directives, or even 
another source statement. There is a specification type called free 
form/comments (abbreviated FF), which you can use in this 
situation to temporarily change the format type. When you enter FF 
on the next screen identification line of a formatted screen, the next 
screen will be in free-form format. There you can key in the 
comment, data, or source statement. (See free-form format under 
selecting format type in 2.2 for instructions.) Before transmitting the 
screen, move the cursor to the next screen identification line on the_ 
free-form screen. You then have five choices for the field there: 


2 
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Next Display 















type specified in column 6 of the curremtly displayed 
free-torm screen 


NOTE: 


Ne entry for this option. Place cursor at bottom of 
screen end transmit. 


Another free-form screen (You must specify FF as 
the next specification type as many times as you 
wish. When you specify another type. however, the 
ednor will use formatred format for the next screen.) 















Current work-space line number with the editor in 
update mode (EDT command mode}. The current 
display format type remains formatted. 





Under the following formatted display example, we illustrate the use 
of a free-form screen to enter a comment in a program. 


if you want to cfange me current display formaz type for ail 


specification types ame me creavon of an RPG I! program, enter the 
update mode (key r- CX on me next screen icentification line of @ 
specification screenj anc imn key in an @FORMAT command. The 
@FORMAT commane s ascssed n 4.2. 
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An Example Using Formatted Format 


The following example shows you how you can create an RPG Il 
source program via specification screens displayed in formatted 
formats. This example explains the creation of an RPG Il program 
beginning with the initial display, traveling through the input of 
source statememts on the specification screens, and ending with 
storing the program on a program library. 


INITIAL DISPLAY 















RPGEDT VERSION XX.XX/xx 
SELECT mapE > 

C = GeEaTe U = UPDATE 
SELECT FORMAT TYPE @® 

1 = POSITIONAL «© 2. = FORMATTED «=- 3. = FREEFORM 
SPECIFICATION TYPE DISPLAY? GED Y= YES = HO 





in this example, we select C, 2, and N; then we 
transmit these selections to the RPG Il editor by 
pressing the XMIT key. A header specification 
screen in formatted format is automatically 
displayed. 








[_] | HEADER SPECIFICATION 














Lise - 1.eee & 


2 sequence sumecs: ERY] ¢ feem rvee & 

7 COMPILATION mone: _ 8 ttven puar: FJ S epreatoe ComTeet: _ 
3 18 venue: BF 18 cueeeacy srmeot: _ 
cS 21 $QVERTCO POINT: _ 26 ALTSEQ: | 














sisary SEaecE: _ 





46 $168 BANDING: | 





Foams AL IGeM@EaT: _ 





42 1861CATOR 





WIT. | 









FULE TeRaestaTiea: 76 


susgouTint: _ 7$ 


cca mame: __ 






pescean 





1B: 
SEIT SPECIFICATION Tepe. st. ox cma: «(f7) 


00 ewww we 00 oe 00 ee ro rn 0 nnn on ee eee nr eee sec eew scores ners 


Here, we key in our source statement on the 
appropriate underlines. On the next screen 
identification line, we specify what is to be 
displayed next. Because we went to enter a 
comment with this statement, we specify the free- 
form screen as the next display by keying in FF. 
Then we press the XMiT xey. A free-form format is 
dispiayed. 
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(__] | FREE-FORM FORMAT 
eA ; on 















Line 
1 2 ) ‘ 5 ‘ 
1234567896323456739022345678961234567890123456789012345678901236 


_..- EE ee ela me) 


i i 1 
8 7 8 $ 8 1 2 
$6789022345678963234655739812345678901234567890123456789612345678 


MEXT SPECIFICATION TYPE ST.on cao: (fl _) + 


wwe ee ewww ew we cenwwe co we con weneewwocwccccce. 


2.0006 





























PR See Pewee ee tower eeeee 


eee ee re 2 ee Oe ees ee te ene See 8 Bee Se Seen Teens Sees wee eee 
- ' 


PROGRAM. Note that an asterisk (*) is entered in 
column 7 to identify our statement as a comment, 
and a valid form type abbreviation (F in this case) is 
entered in column 6 to conform to APG il 
programming language specifications. On the next 
screen identification line, again we specify what is 
to be displayed next. Because we keyed in F on the 
next screen identification line, after we transmit the 
screen, a file specification (in formatted format) is 

displayed. 












(any 


FILE SPECIFICATION 





tia sa sees B 
1 sequence wumece: EET] 6 roam tree f 7 Fitemame-EQURENE 96s rice tree: § 
18 FELE ofsicmatiom: EZ 17 cor: FR re seq: YJ ts rice rommar: FJ ze etx tte: 
eecees LEN: 





28 FILE PROCESSIBG BODE: 29 KEY GO FIELD LEQctH: 











RECERD ADDRESS TYPE: _ 32 FILE ORGANIZATION: | tepicatog: 


3S LEY FLD STARTING toc: 39 EXTEMStON/Lime CTe cope: _ ae cevice: ERE 


13: OVERFLOW 





cont .sees: | 





54 OPTIOM: 6O ERTRY/STORAGE/KEY LOC: 


eonmeon oweeee 





FOLE ABOITIOM AMO CYL OVE % /REY-LENGTN: 






68 2 OF EXTENTS/REY OPTioNS: __ 





Rewind: _ 71 FILE ComOITIONERS: 


EXT SPECIFICATION TYPE, ST. OR CuO: ( 















o--) 


On ane ee OO OOOO we Sew e ees ee eee seme wesc ese wet tesa esos se eee cee est eses mn weee 


Again, we key in our source statement, specify the 
next screen display, and transmit. Because we 
transmitted the screen without keying in an entry 
on the next screen identification line, another file 
specification screen in formatted format is 
displayed. 





We key in the comment: THIS IS A PERSONNEL | 
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{_) | FILE SPECIFICATION 
Soe 











LiGE : 4.8008 
sequence asesce: _ FET] 6 foew tree & 7 sriguame EET] —=ois Five tree: f} 
16 FILE DESt#GRATION: _ 17 EOF: _ 38 SEO: _ 19 FELE Foemat: FJ 20 ace LEM: 


24 eecoeo Les: [ER] 28 FILE Peocessine sone: 





29 KEY O8 FEELO LENGTH: 


wy 
~ 


RECORD ADORESS TYPE: 32 FELE ORGAMIZATIOS: _ 33 OVERFLOW MmOiCaTOR: 


REY FLD STARTIOG LOC: 39 EXTENStoRsLime CTR ceo: _ se oevice: PIRI & 


GO ERTATSSTORAGE EET LOC: 


$3 COMT LIMES: _ $4 OPTICR: 
66 FULE ASEITION AMD CYL OVF % /KEY-LENGIN:® _ 68 © OF EXTERTS/KEY QPTIONS: _ 












7e Rewise: _ 71 FILE COMDETIORERS: __ 
BEXT Specification Tyee. st, ex cua: GEL) 





eee owe eee eee ewer wn ceewen ewe 20 e cee feeweee ee we wneeew ase sec oereneceuces ees 





Like the previous file specification screen, again we 
key in our source statement, specify the next screen 
display, and then press the XMIT key. Because we 
keyed in ST on this screen, the next screen we see 
is the specification type display. 





[_] | SPECIFICATION TYPE DISPLAY 
— ji z Seeis 










emten specrricatios type: (fp 
coos SPECIFICATION TYPES °°" 





Mo MEADER 1F = 1BPUT FIELS & = ALTSER 

Fos FILE C - CALCULATION FT — “FILES 

€ = Extension OR - OUTPUT FILE £Q - “EQUATE 

L + LEME COUNTER OF = OUTPUT FIELD FF = FREE FORM, 
ig - imPUT RECORD =6f «- TELECOMMUS ICATION COMMERTS 
AG - AUTO REPORT AC - AUTO REPORT (/COPY) °° ~ TABLE/ARRAY 


options DELIMITER 








We now select the specification screen to be 
displayed next. We key in the appropriate 
abbreviation and then press the XMIT key. Because 
we keyed in IR, an input specification screen (record 
identification) is displayed. - 
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INPUT SPECIFICATION 
RECORD IDENTIFICATION 








L5@E - 5.09008 





sequence sumece: _ EFT} 6 Foem Type ta (kecoRD to) 








7 eicemawe: EERE? ota | 1s sequence: EY 17 numer: _ 18 OPTION: 
19 RECORD IDENTIFYING imotcatoR, os. of --: ET 
Recons positiee = § = ROT «C/Z7D)0 CHARACTER 
IDENTIFICATION 21 8 28-2 27 2: 
cooes 28 32. 33 34 


38 a9 ae al 





4 


STACKER SELECT: 


MEZT SPECIFICATION TYPE. ST. ee. cmo: (Hs 








Pe wewweeweennee ewe coeesoooes Hwee tees momweewewees ooee 







The rernainder of the specification screens in this 
example (except for the final screen} operate in this 
manner. We key in the source staternent, specify 
the next screen display (on the next screen 
identification line), and then transmit. 


INPUT SPECIFICATION 


FIELD DESCRIPTION 


cape 5 time < 6 .ee0e 
3 : : 1 sequence nuwece: E70) form TYPE IF 


43 DATA Fommat: _ reom: Yes ro: _ 
$2 DECIMAL POSITIONS: _ Friern sew: EEO 

$9 Comteot LEVEL: __ BATCHING/CHAINING FIELDS: 
63 FIELD RECORD RELATION: 


6S PLUS: _. 67 minus: 6S ZERO/SLANE: | 


BEIT SPECIFICATION TYPE, . 0&8 CuD: @.) 








UP-$981 SPERRY OS/3 3-3 
REPORT PROGRAM GENERATOR ll (RPG Il) EDITOR 





_] | CALCULATION SPECIFICATION 
{—-"\ 





time - = 7. 9008 & 
1 SEQUENCE BwesER: _ 6 Foeu TY9€ ¢ 7 ComTROL LEvEL: 


peorcateas: 9: | 12: 18; 18 Facter i: 





28 erceation: EXTY 33 ractoe 2: EXTEN) 43 etsect sseco: EUITTE 
49 RESULT FIELe temctn: ETF $2 DECIBAL POSITIONS: _ $3 MALE AQJUST: | 


ARITHMETIC: PUBS 3 Stags TERO 
COMPARE 3 152 <2 \s2 
LooKuP (FACTOR 2) IS: wiGn low EQUAL 


QESutTIAG tRolcaToRs: $a $6 33 


- _ - 


60 comstats: REXT SPECIFICATION TYPE. ST. os can: (EEL) 


OUTPUT SPECIFICATION 
FILE IDENTIFICATION AND CONTROL 


LIE - 3.0006 


stesence seuser: [EG] 6 Fowm TYPE 82 

Fiucname: ESTEIYS 14 _ (AND/OR COL 14-26) 

Type (usost/e): 16 STACKER/FETCN: _ (ADD/DEL COL 16-18) 
SPACE SEFORE/AFTER: B 19 SKtP BEFORE: __ 

SKIP AFTER: | 





output impicatores: 23 [J 2s = 29 


AUTO REPORT (° AUTO): 


eocewe 


MEIT SPECIFICATION Type, ST, on cue: QZ) 
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= 
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OUTPUT SPECIFICATION 
FIELD DESCRIPTION AND CONTROL 














time =) $9600 





1 sequence sumsee: _ FIT} 
ouTPul imoscaToRS ~ 23 26 


32 FIELD wame: 


38 EMIT CODES: _ 


39 BLAME AFTER: 
49 Emo posttios: FE 


DATA FeawaT: | 


6 Foem TYPE OF 
23 







COMSTART O8 EDIT WeRd: _ 


@ExT SPECIFICATION Typ, st. on cuo: «(EET 





On the last output screen, we key in the final 
Statement of the program. However, this time 
instead of specifying a particular specification 
screen or the specification type display on the next 
screen identification line, we key in CMD. This puts 
the RPG Il editor into the update mode (EDT 
command mode) so we can store our program. Then 
we press the XMIT key. The next work-space line 
(10.0000) is then displayed by itself on the next 

" screen. 
















(_] { uepate move 


ere an) 






AT Pil el comRetE MO=MVPROG FULHLESTFALE ¥SN=060029 S&-765 SE 7 


16. 000> ELIE 


On this screen, we first key in an EDT @WRITE | 
command to store a copy of our newly created RPG 
il source program. We store it as the module 
MYPROG on the program library LISTFILE (which is 
a SAT file} on disk volume DOQO029. For more 


detailed information on how to save newly created 
source programs, see the WRITE command in the 
general editor user guide/programmer reference, 
UP-8828 (current version). After the @WRITE 
command is executed, we terminate the RPG II 
editor session by keying in the command @RPG 
END. ; 
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3.2. USING POSITIONAL FORMAT 


Selections on the 
initial display 
required 
[gana 
optional 


Ng Y. 


Positioning the 
cursor 


Changing the 
’ fine nurnber 


Keying in the 
statement 


Checking for errors 


Specifying the 
next dispiay 











Selecting Positional Format — 


For the most part, the procedure for creating 
RPG Il source programs using positional 
format is exactly the same as_ using 
formatted format except that different 
screens are used. If you want to create an 
RPG I! program using positional format, you 
must select C and 1 (the default values) on 
the initial display. You may also select N or 
Y, depending on whether or not you wantto 
see a list of the specification types. The first 
specification screen displayed after the 
initial display (other than the specification 
type display) is always a header 
specification screen when in create mode. 


Filling in a Positional Screen 


When any specification screen is first 
displayed, the cursor is: in the top left | 
corner of the screen. At this time, you may | 
position the cursor over the line number in 
the top right corner of the screen to 
change the line number, if necessary. To 
change the line number, you key in the 
new line number over the existing one. 
(The current work-space line number can 
be a number between 0.0001 and 
9999.9999.) 


After the line number is set, you must then advance the cursor to 
the field on the specification screen where you want to enter your 
statement. You may then key in your statement on the appropriate 
underlines. Remember, to advance the cursor from field to field (if 
it doesn’t automatically advance to the correct field), press the tab 
key, space bar, or the appropriate cursor scan keys. 


After you finish keying in your statement, check it over for errors. If 
you want to change any of your input, reposition the cursor to the 
field you want to change and then key in the new entry. When the 
statement is correct, move the cursor to the next screen 
identification line on the specification screen: 

) s 


NEXT SPECIFICATION TYPE, ST, OR CmD: oo 
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3=12 


Here, you specify what is to be displayed next. You have four 


choices: 









The entry for this option is one speciicsuon type 
abbreviation (Table 2—1}. 








Next work-space line number with RPG i editor in 
EDT command moce 










New specificanon screen of the same type 





No emry for this option. Plece cursor at bottom of 
Screen and transmit. 





UP-9981 





Transmitting the 
completed screen 


Transmitung the last 
Statement 


Uses for 2 
free-form screen 


Selecting specification 
type FF 


Selecting the next 
specification type 
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Transmitting the Screen 


After you make your choice, press the transmit (XMIT) key. This 
enters your source statement in the work-space file and tells the 
RPG Il editor what to display next. 


_Continue filling in screens and transmitting them until all of your 


source statements are keyed in. On the last specification screen 

containing your final source statement, key in CMD on the next 
screen identification line. This places the RPG I! editor in the update 
mode (EDT command mode) so you can store your program in a 
program library, list it on the printer, display it on the workstation | 
screen, or alter it. 


Temporarily Changing to Free-Form Format 


When using the positional format type, you may occasionally need a 
free-form screen to enter a comment, data, RPG directives, or even 
another source statement. There is a specification type called free 
form/comments (abbreviated FF), which you can use in this 
situation to temporarily change the format type. When you enter FF 
on the next screen identification line of a positional screen, the next 
screen will be in free-form format. There you can key in the 
comment, data, or source statement. (See free-form format under | 
selecting format type in 2.2 for instructions.) Then move the cursor _ 
to the next screen identification line of the free-form screen. For the 
entry field, you then have five choices: 


ms S 


UP-9981 





Entry Next Display 












Another free-form screen (You must specify FF as 
the next specification type 8s many times as you 
wish. When you specify another type, however, the 
editor will use formated format for the next screen.) 


For thus specitication option, use any statement 
specification type other than FF. 














Current work-space line number with the editor in 
update mode (EDT command mode). The current 
display format type remains positionai. 


you want to cnenge the current display format type for all 


Specification types aunng the creanon of an APG Il program. enter the 
update mode (key #1 CMO on the next screen iaentification line) and 
then key in-an G=ORMAT command. The GFORMAT command is 
discussed in 4.2. 





3=14 
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An Example Using Positional Format 


The following example shows you how you can create an RPG Il 
source program via specification screens displayed in positional 
format. This example explains the creation of an RPG II program - 
beginning with the initial display, traveling through the input of 
source statements on specification screens, and ending with © 
storing the program on a program library. Note that the program - 
created here is the same as the one created in 3.1 when we 
created a program via specification screens displayed in formatted 
format. You may want to compare the two methods. 


- 


INITIAL DISPLAY 











RPGEDT VERSION XX.XX/XX. 
SELECT MODE 
C= CREATE =U = «UPDATE 
SELECT FommAT TYPE }8=—- GD 
1 = POST=10aAL 2 = FORMATTED 3 = FREEFORN 


= 


SPECIFICATION TYPE DISPLAY? G5 Y = YES us QO 
















For this example, we select the defauit vaiues C, 1, 
and N; then we transmit.these selections to the 
RPG Il editor by pressing the XMIT key. (Note that 
we have to move the cursor past the displayed N 
before we transmit the selections.) Because the 
default values are selected, the next screen is a 
header specification screen in positional format. 


Lime - 1.9609 


77? 
‘5 


~~ = 


t crease 
se O22 8s occa pe cee ees 


VEXT SPECIFICATION TYPE. ST. of cuo: GY) 





OPA Ow ORE SO eee ween wee rwewesee tees ere wen 


OS OO DOSNT eR TESS Se MEER eee ee 


~ Now, we key in our source statement on the 
appropriate underlines. On the next screen 
identification line, we specify what is to be 
displayed next. ST on this screen indicates that the 
next screen is to be the specification type display. 
When we press the XMIT key, a specification type 
display is displayed. 


seen en» cemarctrmeeertnnneerent naan eeeennpae anne 
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(_] } SPECIFICATION TYPE DISPLAY » 












EMTER SPECIFICATION TYPE: dL) 


cooe SPECIFICATION TYPES *°°° 






no meager tf ~ IMPUT FIELD A = ALTSEQ 

Fo+ Fite © - CaLcutation FT ~ “RULES 

E = EXTERsion OR = OUTPUT FILE EQ - “EQUATE 

tL - LEME CoumTER OF = OUTPUT FIELD . FR = FREE FoRm/ 

Im = 1meUT RECORD =T - TELECOBBURICATION COMMERTS 

AD = AUT® REPORT «AC ~ AUTO REPORT (/COPY) °° - TABLE/ARRAY 
ertiens : DELIMITER 





Here, we select the specification screen to be 
displayed next by keying in the appropriate 
abbreviation and pressing the XMIT key. Because 
we keyed in F, a file specification screen (in 
positional format) is displayed. 





(_] | FILE SPECIFICATION 
{: ——\ ¥ ; 







ime 
33 


2.0006 






piriray2 





2 





22 
i 67 s$é7s 39 8 ‘4 9 12 
-O | Ga. Gabe... -... 
3 3 34 $5 6 6¢6 77 
3.65 96 34 i] €78 @1 


oot wes: ER co ee ococt sb 


REXT SPECIFICATION TYPE, (2) 

























ST, OR CuO: 





ecw cenweeneeeceweweweem nee sees ewe reson sewewewesce sewn sees sce secen esos see esses 


ewww nnwewen oe cee ew enn 202280 e ene wee eee eee ewn se cewe cree roe ewe eee esn scan weesccsen 





Again we key in the source statement, specify the 
next screen display, and transmit. Because we 
transmitted the screen without keying in an entry 
on the next screen identification line, another file 
specification screen (in positional format) is 
displayed. 


UP-9981 
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(| Fire SPECIFICATION 





time - 
22033 
1 67 s¢7e98 «© 83 212 
EO + MM... ER... . 
3336 $5 ‘ 66677 
3s 38 24 6 678 02 


aes beeen cet os 2 . 


wert SPECIFICaTiog TYPE, ST. OR Cad: 





BEr,.rrs712 2 























As on the first file specification screen, we again 
key in the source statement, specify the next screen 
display, and transmit. Because we keyed in IR on 
this screen, the next screen is an input specification 
screen (record identification). 


INPUT SPECIFICATION 
RECORD IDENTIFICATION 















Lime.) e.sece & 


REXT SPECIFICATION TYPE. ST. OW Cup: (HT). 


ee ewe mewn on ew ew ewe en ee wee ew ee ees cme eee ewe ewe mmwen eee swe ane weteewes eoewe 


NOTE: 





The rernainder of the specification screens in this 
example {except for the final screen) operate in this 
manner. We key in the source statement, specity 
the next screen display (on the next screen 
identification line}, and press the XMIT key. Note 
that we advance the cursor {if it doesn’t 
automatically advance to the appropriate field) by 
pressing the tab key. We can also use the space bar 
and cursor scan keys. 
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INPUT SPECIFICATION 
FIELD DESCRIPTION 





Lime ~ 3.9006 


a4 ‘4 5$ § 6 6 6 
5 634 8 23 $ 1 3) $pmazz 


AD). oa)... 


REXT SPECIFICATION TYPE. ST. OR CHO: fc i) 





Seer 800 e owt ene we ew meso sees ese eww ewe e cee ece eos ewen es eee es cewetoeese cones 


00 0 000 trn erate 20 tenes or ce ewe we ewe enn cee eweeeneceec ce enascen swe eeescoes 








f__} | CALCULATION SPECIFICATION 


ee 






1 2 
1 67 3 © & S-FactOR 1 8-00 
llc .. 2... — --------. BL 
3 ‘ osss $ 
3-FACTOR 2 3-mAME 9 «2-3 4PmMZZ & (COMMENTS) 


OO). EE 8 


REIT SPECIFICATION TYPE. st. oe cuo: (EE) > 





eet nn eww we ene we wee eww eee see we ce cee wee enw ee ew rete ewe ne eweee oe ener ese eres oo ees 


eet s eer nee neem te ee wee eerene cece: aoc eee ee ce eweneweqoreewe sc eweeeseneeesoess 


OUTPUT SPECIFICATION 
FILE IDENTIFICATION AND CONTROL 


ee a 
ce ea cach 


SCREEN” 





ro ae Phiatao22 3 
Eis ke 1 ‘7 $5789 13 8 © 2 


AD ot EE. 8 


MEXT SPECIFICATION TYPE. ST. ce cuo: {Y?: 


Lisg - 7.8808 








eee ete cere en ewes oe meen neces eee cnn eee enwseeweeworo we ewes ween eeeeweewcereses 


ewen eww e ene ew come wo owen nce sen ece wee een e een wee oeowwoces co cewwe sec eceeceeserseonee 
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OUTPUT SPECIFICATION 
FIELD DESCRIPTION AND CONTROL 























time - t.s008 & 





2 3 336 6 
t 63 8 B 2 ase 6 
AG oF... 8  . 
4 
5 (CensTANT OB EDIT word) 


ewes eesewooesoconseors 


QEIT SPECIFICATION TYPE. st. oe cus: (LEED 











oer ew ee ee 





On the output screen, we key in the final 
statement of the program. However, this time, 
instead of specifying a particular specification 
“screen or the specification type display on the next 
screen identification line, we key in CMD. This puts 
the RPG 1! editor in update mode (EDT command 
mode) so we can store our program. Then we press 
the XMIT key. The next work-space line number (by 
itself) is then displayed on the next screen. 








L_] | uppaTe MODE 










POET) bs cette SO-TPROG FIL=LSTFILE ¥SM-O8G87% SA-TES Si-3 


On this screen, we key in an EDT @WRITE 
command to store a copy of our newly created RPG 


ll source program. We store it as module MYPROG 
on program library LSTFILE (which is a SAT file) on 
disk volume DOOO2B. 
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3.3. USING FREE-FORM FORMAT 


Selecting Free-Form Format 


Selections on the 
initial display 
required 
Ct 3 


‘optional 


Eo o Ka 





If you want to create an RPG II program 
using free-form format, you must select C 
and 3 on the initial display. You may also 
select N or Y, depending on whether or 
not you want to see a list of the 
specification types. Because the same 
free-form screen is used for all . 


=} specification types, you should not need _ 


to see the specification type display. 


Filling in a Free-Form Screen 





When the first free-form specification 
screen is displayed after the initial display, 
the cursor is in the top left corner of the 


Pieecindiny screen. At this time, you may position the 
7.3 cursor over the line number in the top 
right corner of the screen to change the 
line number, if necessary. To change the 
line number, you key in the new line 
number over the existing one. (The current 
work-space line number can be a number - 
between 0.0001 and 9999.9999.) 
Uses fora After the line nurnber is set, you must advance the cursor to the 
‘free-form column position on the screen where you want to begin keying in 
screen 


your entry. This will depend on whether the entry is a source 


stetement a comment, or data. 
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Entering source 
statements 


= 
BY 


Li 


. Entering comments 


Entering data 


Checking for errors 


Specifying the next 
display 
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When entering source statements, you must know the starting | 
column position for each field; the free-form screen contains no 
field names or beginning column numbers to specify what each | 
new field is and where it begins. Also, because the same free-form 
screen is displayed for all specification types, you must key in the . 
form type (identified on the corresponding specification form) in 
column 6 on the screen. The valid entries are: i 


| 
FORM TYPES 


a ite 





Header Specification 
(Control Specification) 


File Extension 
Specification 


Line Counter 
Specification 


Telecommunication 
Calculation Specification 


Specification 


Auto Report Options 
Specification 


When entering comments, you must key in a valid form type in 
column 6, an asterisk (*) in column 7 (to indicate the entry is a 
comment and not a source statement), and then follow these with 
the comment. The comment is automatically assigned to the source 
statement preceding it 


When entering data, simply key in the data on any of the provided 
underlines. However, be sure not to enter a valid form type 
abbreviation in column 6 because the RPG I! editor will interpret the 
data as a source statement. Also, don't key in an asterisk in column 
7 because the data will be interpreted as a comment. 


After you finish keying in your source statement, check it over for - 
errors. If you want to change any input, reposition the cursor to the 
field you want to change and then key in the new entry. When the | 
statement is correct, move the cursor to the next screen | 
identification line on the free-form screen: 


it UT 
NEXT SPECIFICATION TYPE, ST. OR CMD: Ce) ty = 


i tanh ace a cco i a a alae a aa 


. 
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Here, you specify what is to be displayed next. You have three 
possible entries: 





Entry Next Display 









No entry for this option. Place cursor at bottom of 
screen and transmit. 


Next work-space line number with RPG !! editor in 
update mode (EDT cornmand mode} 
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Transmitting the 
completed screen 


| 


Transmitting the 
fast statement 
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Transmitting the Screen 


After you perform one of these options, press the XMIT key. This 
enters your source statement into the work-space file and tells the | 
RPG II editor what to display next. Continue filling in screens and 
transmitting them until all of your source statements are keyed in. 
Key in CMD on the next screen identification line of the screen 
containing your last source statement. This places the RPG I! editor 
in the update mode (EDT command mode) so you can store your 
program in a program library, list it on the printer, display it on the 
workstation screen, or alter it. 


NOTE: 


If you want to change your current display format type while you are 
creating your program, enter the update mode (key in CMD on the 
next screen identification line} and then key in an @FORMAT 
command. The @FORMAT command is discussed in 4.2. 


An Example Using Free-Form Format 


The following example shows you how you can create an RPG I! 
source program via screens in the free-form format. This example _ 
explains the creation of an RPG II program starting with the initial _ 
display, traveling through the input of the source statements on the 
specification screens, and ending with storing the program on a 
program library. Note that the program created is the same as the 
examples in 3.1 and 3.2 when we created a program via 
specification screens displayed in formatted and positional formats. 
You may want to compare this method with the other two. 












RPGEDT VERSION XX.XX/XX 
SELECT mooe => 

C= CREATE UU = UPDATE 

SELECT FORMAT TYPE (B) 

12 POSITIONAL «2 = FORMATTED 3 = FREEFORN 
SPECIFICATION TYPE DISPLAY? GD Y= YES N= NO 








In this example, we select C, 3, and N; then we 
transmit these selections to the RPG I! editor by 
pressing the XMIT key. In turn, these selections 
cause a specification screen in free-form format to 
be displayed. 
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come - 1.0008 
1 2 3 ‘ $ ‘ 
2234567396123456789612325679991234567898123456789012345678961236 














1 1 1 
6 7 8 é i] 3 2 
567896123656789612345678901234655799012346567898123456739012345678 


ewe Heer e tere re tone omees 


BEST SPECEFICATION TYPE. ST. Of CmD: 




















(2) 


Here, the source statement is keyed in on the © 
appropriate underlines. Because we key in H in 
column 6, this screen is now accepted as 2 header 
specification. When we meve the cursor to the 
bottom of the screen and press the XMIT key, 
another free-form screen is displayed. 


LIME - 2.0008 
1 2 3 ‘ 5 6 : 
32345678963 2345678992234656789612349673901238056789012345678991234 


; 1 1 i 
s o7 8 ) ® 1 
5673901236567396123456789012345678901234567890123656789012365678 


emer ew ew ewoe wn co wwe eee ne ewer oes eens ee cen wewews see nw ese ee owe 


BEXT SPECIFICATION TYPE. ST. OR CBO: ( 










‘waa? 





OP SPSS OOOO POSS SS OES OR SSSR eRe ewee ees eer eweewe ewan eow 


een wee er wo ewe menen nes fees ene ce eesewe ewes ceetnn wees ence wee teen ee eeesseee 





Next, we key in the source statement (along with © 
an F in column 6). The F identifies our specification 

as.a file specification. Then we move the cursor to 
the bottom of the screen and press the XMIT key. 
The next screen is another free-form screen. 


oo; 
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== 


al 


FREE-FORM SPECIFICATION 

























Li@E - 3.9800 
I 2 3 4 3 € 


2234567996 1234567890123456789812345673901234557890123456789012346 











i “4 a 

6 7 8 9 r) 2 2 
567896 1234567890123656799812345678962236567890123456789012345678 
Kacavedentodssnceatedadeciuesctascusancesecas 


QEIT SPECIFICATION TYPE. ST. G8 CBO: 





Co) 


ee ee 


_ NOTE: 


The remainder of the screens in this example 
(except for the final screen] operate in the same 
manner. We key in the source statement 
lidentifying the form type in column 6), move the 
cursor to the bottom of the screen, and transmit. 

















Lime - 
1 2 3 4 $ 6 
1294 £67290123456789012355678901234567890223655789012345678961234 


4.9608 




















s ? 8 : 
$67890323456 789032365678901234656789612365678981234656789012345673 


wee eee es eee enw et eeswe seen eee wees cow eeeweweee coos eeeeeewen es 


QEIT SPLCLFScATIOW TYPE. ST. Of CRB: ( 










ae.) 


A ES SSO SS OLR ES SER SOs Be eeee eee Teme 


NOTE: 


Only I {not IR or IF} is entered in column 6 to identify 
any input specification screen. 
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|_| } FREE-FORM SPECIFICATION 
| ae 





Lat - $.8ee8 
1 2 3 a 5 & 
£23856 7898223456796 1236567396 12346S56 7ESTLTSS6729012345673905236 


ay 1 2 
€ 7 3 5] 8 1 z 


557896 22365678982734 567896 12325679961296SGIC90 1236567890 52345678 








SEIT SPECIFICATION TYPE. ST. OR CUB: (8 





od 





,—\ 


(_]| | FREE-FORM SPECIFICATION 














Liege - 6.3068 


1 2 3 4 $ 6 
2239456789612345672390L2345675981234 SE7ESELIISSE7I9G 12305679905 236 
esec] wovegeamt ta waweorg 3a! ae, 
1 2 i 
6 ? 8 b 8 3 2 


5678901234656739022345 579981 ZI4SETOSOLTIATE TOI LZT4SEC7ESSLII“ZSETE 





SIXT SPECIFICATION TYPE. ST. 02 CEB: (> 








NOTE: 


C és entered in colurrm & to identify 2 calculation 
Speciication screen. 





FREE-FORM SPECIFICATION 
















Liag - 
1 2 z & $ & 
223456789801238 567290123656 7296123456739EL234SE799G172345679982 734 


7.90e9 


momo www oo. 





ee ee nme eel 


i z t 
€ 7 8 bY € t 2 
SE7ISSLITASC TESS LTIAS ESTAS LI IASE PAVE LTICSS TSESHLZIASE TASSELS I“ESETE 


eee o 0 0 ee a ee ee en ee ree ones escent eer eee se 


BELT SPECIFECaTiceg TYPE. ST. OF CBS: 1 





cence eee en an oe 2 cee nt eee 3 re en 0 0 oe rn tn oo a no ee er eee estes 





Only O (not OR or OF} is entered in colurmn 6 to 
identity any output specification screen. 
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{|_| | FREE-FORM SPECIFICATION 
4 







tsmt ~ 
1 2 3 4 § 6 
1234567890 22345673961234567896123456728901234567890123465678991234 



















> 2 1 
‘7 8 9 6 z 2 
5678901236567590123456789012345678901234567898123456789812345678 


ee eee oe 









ao ee EE A EE 


” On this specification screen, we key in the final! 
source statement of the program. However, instead 
of moving the cursor to the bottom of the screen 

_ and then pressing the XMIT key, we key in CMD on 
the next screen identification line of the screen 
and then transmit. This puts the RPG Ii ecsitor in 
update mode (EDT command mode} so we can save 
the program. The next work-space line number 

(9.0000) by itself is then displayed. 















{| | uppaTe MODE 







PP TT hi cowmedt SO-SVPROG FIL=LIST USH-OESSTI TT=S_SA-VES St=72 


2.sc0ce> FTO 







On this screen, we key in an EDT GWRITE 
command to store a copy of our newly created 
program. We store it as module MYPROG on 
program library LIST (which is a SAT file) on disk . 
volume 000031. 





After the @WRITE command is executed, the RPG I! editor session 
(as well as the EDT session) is terminated by keying in the command 
@HALT. 
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4. Updating an RPG I! Source Program 


(Update Mode) 


4.1. PLACING THE RPG I! EDITOR IN UPDATE MODE 


When to 
change modes 


Completing the 
initial display 


You have created your program (in create mode}, and you want to 
write it to a program library, update it, or update another program. 
You must place the RPG I! editor in update mode (EDT command 


‘ mode) in either of two ways, depending on whether the current . 


display is the initial display or a specification screen. 


Selecting Update Mode on the Initial Display 


To select update mode on the initial display, key in U in place of 
the displayed C in the first field on the screen. In the next field, you 
choose the format type in which to display the statements you are 
going to update. The 1 for positional format is already displayed as 
the default value. To select formatted or free-form format, key in 2 
or 3 in place of the displayed 1. You should not want to see the 
specification type display when using update mode. Therefore, 
leave the default value N in the third field. After making your 
selections, press the XMIT key to transmit your selections to the 
RPG Il editor. 


I] | initiac DisPLay 
Ee 





RPCEDT VERSION XX.IX/XX 


SELECT mODE () 

C = CREATE U = UPOATE 

SELECT FORRAT TYPE ¢1) 

1 = POSIT OWAL 2 & FORMATTED 3 = FREEFORN 
SPECIFICATION TYPE OSSPLAY? 8 (M) Y= YES © = NQ 
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The first work-space 
line number 


Loading the program 
into the work-space 


Keying in 
EDT commands 





Keying in 


The current 
work-space 
line number 


Updating or 

. Saving the 
work-space 
file 


Reading another program 
from disk 


Using EDT 
_ commands 
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. The current work-space line number (by itself) is displayed on the 
next screen. In this event, that line number will always be 1.0000 
because this is the beginning of a new RPG II ednor session. When 
the line number is displayed, you may then begin the update 
session. lf you are updating an existing program, you must always 
begin by keying in an EDT @READ command to transfer a copy of 
the program you want to update from a program library to the 
work-space file. Once the program is loaded into the workx-space 
file, you may then key in any of the EDT cormmands to update it. 
These EDT commands (which are summarized in Appendix B) can 


. be used to add, delete, and alter statements in your progrems. 


Switching from Create Mode to Update Mode 


To switch the RPG II editor from create mode to update moce (=DT 
command mode}, key in CMD on the next screen identification line 
on the currently displayed specification screen: 


NEXT SPECIFICATION TYPE.ST,OR CMO: (fE"R)) 





The next screen contains only the current work-space line number. 
This is the next higher line number after the one that appezred on 
the specification screen where you keyed in CMD. 


When the line number is displayed, you may then begin the update 
session. At this time, you may either update source statements in 
the work-space file or save the content of the work-space file on 
disk or format label diskette. 


During update mode, you may also read a copy of another library 
program into the work-space file to update that. However, if you do 
not first save the content of the current work-space file, the source 
statements it contains will be lost when the new file is read. 


Once you ere ready to update the progrem, you may begin by 
keying in any of the EDT commands that piay an important role in 
the updete of a program. Again, you shculd understend the 
functions of these commands and how to use them in cerder to 
successiully update your own RPG Il programs. Fer your 
convenience, the EDT commands used more citen are summarized 
in Appendix B. However, for a detailec explanation cf each 
commend, see the OS/3 general editor use- cuide/proc-emmer 
reference, UP-8&28 (current version). 
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4.2. SPECIAL COMMANDS : 


Three special 
function commands 


Changing the despiay 
formnat type 


Syrrtax 
variations 


The three commands (one RPG I! editor command and two 
enhanced EDT commands) that perform special functions when 
used with the RPG Il editor, are: 


switcn the RPG Il editor from update mode to 
create mode. 


Lets you display specified lines in your work-space 
file in positional, formatted, or free-form: 
format. 


Lets you display, and then change, a source. 
statement in the work-space file. 





Changing the Format Type (@FORMAT} 


The @FORMAT command enables you to change the display - 
_ format type (specified on the initial display or the most recent . 
@FORMAT command) and/or switch the RPG I! editor from update | 
mode to create mode. The valid syntax variations for this command 
are: 






; @FORMAT specification-type 
@FORMAT Specification-type, format-type 
@FORMAT . format-type 


@FORMAT . format-type, CMD 
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Parameters 


Pararneter 
restvrictons 


Exarnples 
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Specifies the next specification screen to 
be displayed. (You may specify any of the 
specification tyres or the specification 
type display GT).) This parameter is 
required when swicching from update 
mode to create mode. 


Specifies the new format type to be 
displayed. Key i: 1 to specify positional, 2 © 
3 to Specify formaztec. and 3 to specify free- 
form. This paremecer is required if you 
wamt to change the display format. 


Specifies that the RPG HU editor is to 
remain in update rode. 












Switches the RPG Ii editor back into create 
mode (from update mode) and displays a 
calculation specificatior screen (in the current 
format type) for you to enter a staternent 


Resets the display forrsat type to formatted and 
switches the RPG II editor into create mode. 
Because F and 2 are specisied, a file specification 
screen (in formated fomnaz) is displayed next for 
you to enter a statemert. 











Resets the display formz type to positional without 
switching the RPG Ii ecror back imto create mode. 
When neither a spectcazion type or CMD is 
included in the €FORNAT command, the current 
. ; work-space number ts cresemed next for you to 
i “2 oi" enter a command. 
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GPRINT function 
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Resets the display format type to free-form and 
keeps the RPG Il editor in update mode ready | 
to accept the next command 





Switches the RPG Il editor into create mode 
and displays the specification type display for you 
to select a specification screen 


+ ees a, 


Displaying Statements (@PRINT) 


The @PRINT command enabies you to display specified lines of 
your work-space file in positional, formatted, or free-form format. 
{in this case, the free-form format is the traditional EDT display.) 
Statements contained in the lines are displayed in the display 
format type that was most recently specified, that is, the one 


specified on the initial display or in the most recent @FORMAT 
command. 


Format: 


@print[line-range][,‘search-string’[*n}] 





This format is presented for convenience. If you need to know more 
about the parameters or the PRINT command itself, see the OS/3 


general editor user guide/programmer reference, UP-8828 (current 
version}. 


tf statements are displayed in either positional or formatted format, 
only one statement at a time can be displayed. However, if the 
free-form format (traditional EDT display) is used, more than one 
line can be displayed. 


NOTE: 


When the workstation screen becomes full with data lines during 
the execution of a PRINT command, output of data to the 
workstation screen halts. To continue the PRINT command {i.e., 
display the remaining specified lines}, press F19 (function key 19). 
For more information on the use of Fi9, see the interactive 
services commands and facilities user guide/programmer 
reference, UP-8845 (current version). 
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Example: 
Displaying one 
specification screen 


Example: 
Displaying successive 
specification screens 
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imi EXAMPLE 1 








Lime = gene & 

1 
1 67? 5 
049 sa coriLE oA 


2 2 2 3. 3 2 064 
1 s 8 2 5 § 2 
35 Bc} 


GEXT SPECIFICATION TYPE. ST. OR CBD: ¢ 


tia 
7893 
A 82 


~-) 









If 1 (for positional) is specified on the initia! display, 
the command @PRINT 4 produces this screen. | 





C 


[ } § EXAMPLE 2 















Lamt - asees GB 


‘1 S€QUERCE nuMBER: 046 & FORm@ TYPE 18 (RECORD 18y 
7? FILEMAME: COFILE “4 1S SEQUERCE: AA 37 sumsen: 13 oPTioe: 
19 RECORD IDENTIFYIMG IMDICATOR. OS O& °°: BT 
gecors Position e= mot 6/2770 Cuacactte 
IOENTIFICATICR 22 1s 28 wee 27 «5 
copes 28 32 33 34 
35 33 46 at 


42 STACKER SELECT: 
MEXT SPECIFICATION TYPE, 







ST. OR CmB: ¢ ’ 





tf 2 (for formatted) is specified on the most recent 
@FORMAT command, the command @PRINT 4:5 
produces these two screems. Because only one line 
can be displayed on a singie screen, press the XMIT 
key to display the second screen. 











Liat - 





3.000e 












SEQUENCE NumeER: ose 6 FORM TYPE iF 
42 DATA FORMAT: 46 FROM: 1s 43 Yo: as 
$2 DECIMAL POSTTIONS: SJ FIELD Same: BOMEIR 
CONTROL LEVEL: 
FIELO RECORD PELATIOR: 
PLUS: 67 Brags: 69 JERC/RL ARE: 
REXT SPECIFICATION TYPE. ST. OR CBD: ( 1 












SI MATCHIRG/CWAIBIRG FLELOS - 
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Example: 
Displaying lines in 
free-form format 


@UPDATE 


Syntax 


. Parameters 


Keying in 
- changes 
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2.EGOSDEZOFCOFILE Pear REASER 
T.SSCEDOIOFPREILE 8 8 F 132 PRIESTER 
S.O8OOD>G4OICOFILE BA 83 r5RCt 

5.6886>9058t 








produces this screen. 





Updating Statements (@UPDATE) 


The @UPDATE command displays statements like the @PRINT 


command and allows you to change them. 


@uPOATE[line-range][.*search-string’[*n]}] 





215 465 mamtia 


 f 3 (for free-form) is specified on the most recent 
@FORMAT command, the command @PRINT 2:5 





This format is presented for convenience. If you need to know more 
about the parameters or the @UPDATE command itself, see the 
OS/3 general editor user guide/programmer reference, UP-8828 | 


(current version). 


The @UPDATE command displays specification screens for the 


1 
t 
' 


| 


i 


specified lines in the work-space file in the current display format 


type. These format types are positional, formatted, and free form. 
(The free-form format is a 2-line, 64 characters/line format.) Make 
any changes necessary by moving the cursor to the fields you want 


to change and keying in the corrections. 
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Transmitting Before transmitting the corrected screen, move the cursor to the 
the - next screen identification line. For the entry field there, you have 
eanget four choices: 


Feed 








4 ornons" 

















i 
li 


The new version of the statement overwrites the 
Staternent in the work-space file. The specification 
screen for the next statemem specifeed in the 
UPDATE command is displayed. 





No entre for this option. Place cursor at bottom of 
sereen and transmit. 


Any changes just entered on the screen are 
ignored. The statement in the work-space file is not 
changed. The specification screen for the next 
statement specified in the UPDATE command is 
Grsplayed. 








# used alone, the UPDATE command terminates. If 
combined wrth another EDT command. only the 
UPDATE funcnon terminates {i.e., no changes made 
are dispisyed). 






Deletes the statement from the work-space fie 
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Lime - 
prryr?2 2 22°33 
3 €7 "“se7898 4 9 22 
eze FcefILE TPEAF 
3 3 34 $5 6 €e677 
3063 $8 34 6 678 #3 
READER 


REXT speciFication Tree, st. oa ceo: (BRED 














deleted from the file. 





1 StQUERCE Bumser: ove 6 Form Type ¢ 
imsicaters: 9%: 12: 1$: 
OPERATios: Bove 33 FactoR 2: 
RESULY FIELD LemeTw 31 




















WaBeia 
$2 DECIMAL PeSiTloNs: 
ARITHMETIC: Pus 
Compare 1>2 













































screen is transmitted. 






Rimage - 


7 ComTmet LEVEL: 

18 FACTOR 1: 
&3 RESULT FIELD: RameOT 
$3 MALE ADJUST: 
minus 
Iw? 











7.9609 





z7ER0 
is? 


If 1 (for positional) is specified on the initial display, 
the command @UPDATE 2 produces this screen. 
Because @ST is entered on the next screen 
identification line of this screen, the statement is 
















Leone (FACTOR 2) 1S: nicR tow equat 
RESULTIBS ImDICATORS: 56 $6 58 
66 comments: WEXT SPECIFICATION TYPE. st. o@ cuo: (EEE) 


tf 2 (for formatted) is specified on the most recent. 
@FORMAT command, the command @UPDATE 7 
produces this screen. Because @NO is entered on 
the next screen identification line, any changes 
made to the statement are ignored when the 


2.8000 & 


4-9 
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Example: 
Terminating 


updates 






l@e ~ 5.00e¢ & 
4 s 6 
1234567890523456789022345670901234567990123455789912345678982235 








1 1 a 
so7 8 9 ® i 2 

5$678991234567890123656789012345679991234567890123656789812345678 
EXT SPEcIFication TYPE, st. o8 cua: (BET 





























ff 3 (for free-form) is specified on the most recent | 
@FORMAT command, the cornmand @UPDATE 
5.7,8 produces this screen. Because @CO is 
entered on the next screen identification line, the 
UPDATE command is terminated when this screen 
is transmitted. The remaining lines specified in the 
UPDATE command (lines 7 and 8) are not updated. 


4.3. SAMPLE UPDATE SESSION 


The program created in the formatted display exemple in 3.1 is | 
updated in the following example. The specification screens - 
displayed in the formatted display formats, the RPG II editor 
commands, and necessary EDT commands are used to update the 
program. The program was originally designed to read a list of © 
names and then print them on the printer. However, it is updated 
here to include a phone number beside each name. 


INITIAL DISPLAY 











RPGEDT VERSION XX.XX/XX 
SELECT MODE (BD 

C= CREATE U = UPDATE 

SELECT FORMAT TYPE = (f) 

1 = POSITIONAL © 2 = FORMATTED 3 = FREEFORM 
SPECIFICATION TYPE DISPLAY? GH) Y= YES N= MO 






For this update session, we select U, 2, and N. 
transmit these selections to the FPG II editor by 
pressing the XMIT key. The next screen contains 
only the current work-space line mumber (1.0000). 
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PRET Tr eREAD MO-MPaGS FIL-LISTFILE VSB-O88879 


le. seer > EZ E 








At this step, we key in the @READ command to 
transfer a copy of our program (MYPROG) into the 
work-space file from the program library (LISTFILE). 
Then we press the XMIT key, and the next work-_ 
space line number (10.0000) is displayed for us to 

key in another command. . 





Adding We know that, in order for the program to print out a phone 

source statements number beside each name, we must add three new source 
statements: one after line 5, one after line 7, and one after line 9. 
The first statement must be entered on an input specification 
screen {7ield description), so we issue the @FORMAT command to 
display an IF specification screen. 


INPUT SPECIFICATION hay 
RELD DESCRIPTION . - 






















Line = 
£5 pape: 2 Sequence ussser- TO 6 Foam TYPE tF . 
bnwt ad zs 
43 pata FoRmAT: _ sa From: — fF ss re: 
52 REDIBAL POS?TIORS: 52 Freco same: ESI 


S35 Camteot LEVEL: G1 MATCHING /CHAINIGUG FIELDS: __ 
62 FIELD RECORE RELATion: 


65 PLeS: 8 67 mines: 69 1EROsEtaa: 


MCxT specificatsom type. st. on cus: (G_) 


oe 0 eS Oe OO ONE RESO HOST ere as Sere ee ee wewreweesorsuTeerT ewes 





When the IF specification screen is displayed, we 
change the line number to 5.5 (a line nurnber 
greater than 5) and then key in our source 
statement. Because the next new source 
statement of our program must be entered on a 
calculation specification screen, we enter C on 
the next screen identification line of this screen 
and then transmit. The next screen has line 
number 6.5. 
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As you know, the line number automatically advanced by an 
increment of 1.0000 as each new screen is created. To add 
more than one line between existing lines, you need to determine 
the increment. Then, key the line numbers yourself. Hf, for 
example, you want to add six new lines between existing lines 
5.0000 and 6.0000, you can number the new lines 5.1, 5.2, 
5.3, 5.4, 5.5, and 5.6. After renumbering the first screen as line 
5.1, the next screen generated is automatically numbered 
6.1000. Change the number of this screen to line 5.2 and key in 
the source statement. The next screen generated is numbered 
line 6.2000; renumber it 5.3 — and so on for the remaining new 
screens. : 





CALCULATION SPECIFICATION 


& 


2 
LIME - ior lil ta 


3 SEQUENCE Numsee: [7 6 Feam “YPE ¢ 7 CORTROL LEVEL: 





tMOICATORS: 9: 0) 12: Lo 18: Loo 18 FACTOR 1: || ye 
22 operation: EESTS 33 factoe 2: EES 43 wesuct Fiero: TTR 2 
49 RESULT FIELD LemcTN: _ ff 52 BECIMAL POStTICNS: | 53 WALF ADJUST: 
AQtTNMETIC: PLBs ainus | 2ERO = 
compaee ; 1>2 1<2 1x2 zs 
Lookur (FACTeR 2) 1S: niGn Low Equat : 

RESULTING IMONCATORS: S68 cy a) 

68 COMMENTS: SEIT SPECIFICATION TYPE. st. on cuo: (EZ) 


eww 20 w enw ewn es cece een ewww een See eee eews 0 eet eee w cee r ewww eeere wrens cceswe none 


(wee we 00 00 00 0000 000 808 28 cen een Seow eet cen enwe swe een enwe eee cesesesece 


| When the calculation specification screen is 
J displayed, we change the line number to 7.5 (a 
“| line number greater than 7) and key in our source . 
Statement, Because the final new source | 
statemem: of our program must be entered on an 
output specification screen (field description and | 
contro}, we enter OF on the next screen 
identification fine of this screen and then transmit. 
The next screen has line number 8.5. 
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OUTPUT SPECIFICATION 
FIELD DESCRIPTION AND CONTROL 





vac- ET) EF 

1 stquence euusce: _ 5 6 Foew TYPE OF * 
ouTrur impicatoes ~ 23 00 26 2 28 

32 FIELD mame: ; 

38 EDIT COvES: ; 7 


Biase after: BJ 

60 €ne positios: 8 : 
o4 DATA FenmaT: _ 

4S Comstamt 08 EDIT oro: eee 


MEAT SPECIFICATION TYPE. ST. G8 CED: Gala) 





te 


When the OF specification screen is displayed, we 
again change the line number. This time we 
change it to 9.5 (a line number greater than line 9). 
Then we key in our new source statement. 
Because we wamt to return to update mode (EDT 
command mode) to save the updated version of our 
program, we key in CMD on the next sereen 
identification line. A work-space line number is 
then displayed, ready to accept an EDT or RPG I! 
editor command. 

















Keying in the last 
new source statement 


Keying in CMD 









10. seee> ELTTSCEE TPT EETIT TE] 
IS1O@ FULESMODULE ALREADY EXISTS: On TO WRITE 10 ite ty. mime 
16.5906>' 


Storing the corrected 
program 





Here, we emer 2 @WRITE command to store our 
updated program (MYPROG) as a module on the 
program library (LISTFILE), which is a SAT file. 
Because a copy of our program already exists on the 
file, we are asked if we want to overwrite the 
previous version. We answer yes (key in Y), which 
causes the new version of our program to be saved 
and the old version to be deleted. We end our 
update session by keying in @RPG END. 


Ending the 
APG il session 





4.4. COMPILING AN RPG Il PROGRAM 


Creating and running 
a job to compile a 
program 


Worxstation entries 


= Entry cescripsors 


~> ww we 
. «# «#8 ¢ 


Pee CEA Ad isis 
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Aker creating or updating an RPG II program, you might want to 
try to compile it immediately. To do this, you must first save the 
procram in a SAT file on disk or format label diskette. Then you 
Must write and run a job control stream that executes the RPG Il 
compiler and wses your saved RPG Il program as input. You begin 
with the RPG Il editor in update mode and a complete RPG Il 
program in the work-space file. The following entries save and 
compile the program we created in 3.1: 


18.8990 WRITE BOmMYPROG FILSLISTFILE  VSN=DSES2S. SAT=YES ,SIZE=2 
18. 9888S EPG ERD 

18.8688S DELETE 

1.89687/ JOB CMPRPG 

2.9896//RYPEOG RPG tN=(DEHG239. LISTFILE) 

3.998673 

4. 8688S WRITE MOKCMPRPG  FIL=MYICS .VSN=080829 .SATH=YES.SIZE=1 
4.888802 HALT 


RV CMPRPEG: (MYJCS .D88829) 





oh 
. 


Save the program in a SAT file on disk. If the SAT file is 
already ai:ocated, omit the SIZE parameter. After the @WRITE 
commence is executed, a copy of the program exists on disk 
end another copy remains in the work-space file. 


Terminate the RPG Il editor, but not EDT. 


Delete the copy of the program in the work-space file. 


how oN 


Use EDT zo write a job contro! stream to compile the program. 


ui 


Save the job contro! stream in a SAT file on disk. 
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Correcting compiie errors 
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6. Terminate EDT. 


7. Put the workstation in system mode. Press the FUNCTION key 
and, while holding it Gown, press the SYS MODE key. 


8. Enter an RV command to run the job control stream thet 
compiles the program. 


After the job is executed, a message indicating successful or 
unsuccessful compilation is displayed at the workstation. If there 
are any errors, use EDT screen mode and/or the EDT error file 
processor (EFP) to correct the errors. For information about using — 
EFP, see the general editor user guide/programmer reference, 
UP-8828 (current version). If the errors are extensive, you might 
wamt to use the RPG Il editor in update mode to correct the 
program. 
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5. Error Detection and Recovery 


Types of errors Four types of errors may be encountered during an RPG I! editor 
session. 





Invalid specification type 


Hardware and software errors 


List of errors A complete list of all errors encountered during an RPG Il editor 
session appears in the OS/3 system messages programmer/ 
operator reference, UP-8076 (current version). 


5.1. SYNTACTICAL AND PARAMETER VALUE ERRORS 


Automatic The RPG Il editor checks each new source statement (entered via 
checking specification screens) for syntactical and parameter vaiue errors 
when it is transmitted to the work-space file. If this.type of error is 
detected, an error message appears on the last two lines of the 


Error indication specification screen. The error message contains an error number, 

description, and recovery action. A blinking character depicts the 
- Choosing to : location of the error. You must then either correct or ignore the 
correc: or error message to have the next screen displayed. To correct this 


igneren sre type of error, reposition the cursor to the error and key in a correct 


entry; or if you choose not to correct it, you can key in IGN (for 


ignore) on the next screen identification line: é 


NEXT SPECIFICATION TYPE, ST, OR CmD: ({ES)) 


UP-9981 





Handling 
muttiple errors 


Handling compile 


Handling 
symtax errors 
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Note that if you ignore the error, the staternent is written to the 
work-space file as is and the screen specified on the next screen 
identification line will be displayed next. The portion of the entry 
following the detected error is not checked for errors. 


NOTES: 
7. Multiple errors in a statement are handled one at a time. 


2. Although the RPG Il editor checks for syntactical errors, this 
does not eliminate compile errors. For example, if you key in 
FILEA on the file specification and FELEA (E entered instead of 
1) on the input specification, you will get a compile error even 
though the RPG Il editor. indicated the file name was 
syntactically correct. 


3. if any syntax errors are detected when source statements are 
entered or changed in command mode, the error message is 
displayed in the free-form format. 


5.2. INVALID SPECIFICATION TYPE 


Hf your apecitication is correct: but ‘te anitty on the next screen 
identification line is not valid, the RPG ll editor displays the 
following error message on a screen by itself: 






LINE = line-number 


REDSOS-INVALID FORMAT NAME. 


PRESS-TRANSMIT TO CONTINUE. 


You must then press the XMIT key. The RPG il editor then displays 
the specification type display, where you must enter a valid 
specification type abbreviation for the next type of specification 
screen that you want displayed. 
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5.3. EDT ERRORS 


Error indication Because the RPG I! editor is a subeditor of EDT, EDT errors may 

and recovery also occur during an RPG Il editor session. The error number and 
error message text of an EDT error are displayed on the 
workstation screen to help you correct the error; and the line 
number of the line containing the error is redisplayed for you to 
enter the correct command. 


5.4. HARDWARE AND SOFTWARE ERRORS 


lf the RPG II editor detects a hardware or software error, it clears 
the screen and then displays the following error message: 






LINE - line-naumber 






: REDOIS-MARDWARE OR UNRECOVERABLE ERROR. RPG EDT SESSION TERMINATED. 
: : PRESS -TRANSMIT~ TO CONTINUE. 


_To respond to this message, press the XMIT key. lf an EDT work- 
space line number is displayed next, then EDT is still active. You | 
can enter @RPG to reactivate the RPG Il editor. In this case, all or 
part of your work-space file may be lost. To determine what is still 
in the work-space file, enter an @PRINT command. Any portion of 
the program that you had already saved through an @WRITE 
command should still exist in a file on disk or diskette and may be 
retrieved by using an @READ command. If EDT is no longer active, 
the system operator may have to determine the cause of the error 
or help you reactivate the editor. 
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Appendix A. Specification Screens 


A.1. SPECIFICATION SCREENS IN FORMATTED FORMAT 


The foliowing 12 specification screens show the formatted format. 


LIRe - 1. e00e 
i SEQUERCE BusseR: 6 Form TYPE ¢ 7 ComtRot LEvec: 
paaicatees: $: 2: Ss 18 FacToR 1: 


22 OPERATIOR: 33 Factee 2: 43 RESELT FIELD: 


ee 


eonewe 


49 RESULT FUELB LESGTR: __. $2 DECIMAL POSITIONS: _ $3 MALF ADJUST: _ 


AQUTMBETIC: Pius wtaus ZERO 
COMPARE Hy 132 1<2 im2 
loccep (factoe® 2) 8S: aren Low EQUAL 
RESULTING SADICATORS: s¢ sé 


6¢ Comments: Peat MEXT SPECIFICATION TYPE, ST. OR CMO: (___) 


2 er OS Oe ee ee Camere es eee wee ete eee wee eeeenenowe 


tee eee ne ee ne ee ome, SS SSS S SRS SSS SS REO ENSO ESE 





@ 
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LIME ~ 1.0686 
SEQUENCE mUMBER: 6 Form TYPE £ 


RECORD SEQUENCE OF CHAIBING FILE: |. 9 RUMMBER OF CHAINING FIELD: 


FROM FILERAME: 18 TO FILENAME: 


cco ewnoe —— 


TASLE/ARRAY NAME: 33 NUMSER OF ENTREES PER Record: 


RUBBER OF ENTRIES PER TABLE/ARRAT: @O LENGTN OF ENTRY: 


ry 


#5 stQ.: | Z 
ALTERBATING TASLE/ARRATHAME: S2 LENGTN OF ENTRY: 


DATA FORMAT: 44 DECIMAL POSIT EORS: 


, 
DATA FORMAT: _ 56 DECIMAL PesiTIONS: _ S7 StQ.: | E L. 
4 


COMMENTS: __ WEIT SPECIFICATOMN TYPE, ST, Of CMO: (___) 


90 000s eee own wee eee wee ee no een ween ene we ow eeoe een. 


000 ncee cee“ ewww ee ee ee wee eee weneweoewen: OA Oe OP OweresonereDeeenee 





; Lise - 1.0008 
SEQUENCE GUMSER: 6 Form TYPE F 7 FILEmeme: IS FILE TYPE: _ 


~wece ewwevooe 


FILE DESIGRATION: 17 EOF: 18 SEQ: | 1% FILE FORMAT: 279 BLK LER: LL 


RECORD LER: 28 FELE PRGCESSIBG BODE: _ 29 KEY O8 FIELO LENGTH: 


cone “- 


RECORD ADDRESS TYPE: 32 FILE O8GawtZAT ION: 33 OVERFLOW INDICATOR: 


- - 


REY FLO STARTING LOC: _ 39 EXTERSIOM/LIME CTR CODE: 4@ DEVICE: 


Sed - eowesoe 


CONT LINES: 54 OPTION: $8 EMTRY/STHRAGE/KEY LOC: 


FILE ADDITION AWO CYL OVF.% /KREY-ULRETH: SO 2 OF EXTENTS/KEY OPTIONS: _ 


REWINO: _ 72 FILE COMDETIORERS: 


MEZT SPECIFICATION TYPE. ST. QR TMD: ( ) 


Cee eereweesw es ewewweseownee 


en eeceee cece eee ewwe ere eee eee eens] eee wn 208 ee em eeeens tee wee esos see feenees 
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_} | HEADER SPECIFICATION 
a J : 


Rime = 1.0086 
SEQUENCE HUBBER: Foem TYPE ff 


eorece 


COMPILATION wODE: _ EReon DUMP: _ 9 OPERATOR CosTROL: _ 
penuc: | 18 cueRENCY SymsoL: __ 

DaVERTED peaet: _ 26 ALTSEQ: — 

Bimaey SEARCH: | «== 48 SIGH NANDLIMG: _ 

Forms ALIGMBENT: | | 42 IMDICATOR 181T.: _ 


PILE TRamstation: _ 79 CCA RAWE: 


75 PROGRAM 16: 


\ 
i 
SEIT SPECIFICATION TYPE, $7. OR CBO: {__) 


SusRouTiNe: _ 


20 cow eee oe een e800 090280 0 08 0 008 900 et ewe 080 ee comer eae en eeawaeenwes 


PA wee ot 80 e tow 00 008 ete ee Cee ee en eee woew oe ences 


INPUT SPECIFICATION 
RECORD DESCRIPTION 


AIRE ~ 1.9006 
2 SEQUENCE RUBBER: - 6 Foam TYPE $8 (RECORD 15) 


won, 


7 FILEMAME: ae 15 SEQUENCE: 


17 newser: _ 38 OPTION: 


19 RECORD IDERTIFY*SG INDICATOR, BS O8 °°: 


Recoro : POSiTIOn c/zs8 CHARACTER 
IDENTIFICATION 21 26 27 


cooEs re 33 34 


3s 46 al 


42 STACKER SELECT: | 


BEIT SPECIFICATION TYPE, S7. O08 CMO: (_) 


eweeewewennc cence s een cee nnn wee see e ween cece wee ete ew ce wees ewer ewe ewes een arene 


ewww een 500 ce eee ween 00000 00 0 20 tate 0208888 e 8 Cems ete Sew eme wee Teese 
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INPUT SPECIFICATION 
FIELD DESCRIPTION 


Lime « 1.90608 


SEQUENCE BuMBER: | 6 FORM TYPE 


ewone 


OATA FoRmat: _ 44 FROM: 


DECIMAL POSITIONS: S3 FIELD WAME: 


ComTMol LEVEL: __ 61 MATCRING/CHAIRING FIELOS: 


FIELD RECORD RELATION: __ 


PL.ss: 67 Bimes: _. 6S ZERO/BLARE: 


WEXT SPECIFICATION TYPE. ST, OR CUB: (__.) 


2 OS ON Ce Dee tee See eee eee e ee ee sewemnee tee scene neen 





[__] | LINE COUNTER SPECIFICATION | 





Lime - 1.998€ 
I SEQUENCE BUMSER: 


6 Foem TYPE t 


LINE @ CHARNEL @ CHANNEL # LIME @ CHARREL 8 
3 23 23 


33 38 43 


4g 


- 


etm meee wm cews em ewoc ome wecenwe cece nwo ene cee eeeeewene coerce we seer cen cweweerern 
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OUTPUT SPECIFICATION. 
FILE IDENTIFICATION AND CONTRO 








2 SEQSERSE REBIER: 6 Foxe TYPE se 


7 FILERABE: Ba, (680/@82 GIL 14- 
15 TYPE (8/0/T/E): _ 6 STACKER/ FE TCU: 


17 SPACE BEFOREsAFTER: | 9 SRtp SEFDSE: __ 
21 SEEP AFTER: __ 
eutTPstT imescatoss: 23 26 2 


oa &* oe 


32 ABTS REPORT (° 4878): 


SEXY SPECIFICATION TYPE. ST. OB CQ: (>) 


OUTPUT SPECIFICATION 
FIELD DESCRIPTION AND CONTROL 


2 SEQBENCE BumsEr: € Feem TYPE (OF 
SITPUT imOlcatees = 23 26 23 


FrELE Bast: =, 
ERtT CORES: _ 
Q:ame AFTER: | 


ESD POSITIGR: 


OSTA FOeRAT: _ 


CSHSTART Of EBYT wort: 
SEIT SPECIFeCation TYPE. ST.aR Cap: 


ik 


Gime ~ 


46) 
(ADB /OEL COL 16-18) 


Lime - 





1.90e¢ 








UP-9981 SPEARY OS/3 : A-6 
REPORT PROGRAM GENERATOR Il (RPG i) EDITOR 








L_] } TELECOMMUNICATION SPECIFICATION 





i 
‘eT | Sn ol) 
1 SEQUENCE BemstR: s&s Foes Tree Tf : | 
7 FILERAME: 1S COMFIGwRATION: _ i § 
16 TYPE OF STATION: _ 19 TRAMSPARERCT: | 28 SwITCKED: | i £ 
43 REMOTE TEewIRAL: $3 PERUABERT ERROe imDtCATOR: __ 
i 


SS walt Time: | 66 LAST FELE: | 


6S REMOTE DEVICE: 73 TERBIMAL BANE: 


_ BERT SPECIFICATICR TYPE. ST. O28 CMD: (___} 


Lime + 1.9008 6 


1 SEQUEBCE BUMSER: 6 Ferm TYPE © 


7 SATE sowace: _ 2 sosact Lierary same: 
27 DATE SUPPRESS: _ 28° SuPeRESs: _ 
3¢ LIST OPTIONS: 


REIT SPECIFICATION TYPE. ST. OR CEB: { 


ee 0 rn 0 OREN SE RTE ewe we eweees Seeeeweewene sence 
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{_] | AUTO REPORT (/COPY) SPECIFICATION. 






Lime = 
1 SEQUENCE HUMBER: 6 Foam TYPE: _ 


? Cory 
13 SOURCE LIBRARY. BAwE-: _ 


ee ee en eee ener ae 


C0 wee 20 o 020 oe ween 00 00 0 ee en ee Oe eee eee neem e 


A.2. SPECIFICATION SCREENS IN POSITIONAL FORMAT 


The following 15 specification screens show the positional format. 


Cd | ALTERNATE COLLATING SEQUENCE SPECIFICATION 


Lime - 1.0000. & 


ALTSEQ 


od ceaei lean Suits cas esas, Seas wtoe vaca ease Saas: cod5 cane! cece: ues? | 
1 1 F&F 2 1 t 1 

6 6 7 7 EI 8 8 $ 3 € J 8 1 I z 2 

s ¢ 3 7 2 s $$ 3 7 1 S$ $ 3 7 2 5 


wenn anew eoew ewe ewww come meee eres ome eee ewes wees cone cowe ees cone | 


MEXT SPECIFICATION TYPE, ST. OR CBO: ( 


wenn nen 0 0 00 20 eee eee 2 oo 00 ee ee en eo et en ne er eee eee teem enenwe sees 
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_] | CALCULATION SPECIFICATION 





L18e ~ 1.9008 


i 2 
1 67 9 & & &-FAtTION 1 8-07 
te Oe ee eae aes ck Ss 
3 4 4 $885 6 


3-FACTOR 2 3-maME 9 82:3 SPumZZ 9 (COMMEETS) 


REXT SPECIFICATION TYPE. ST. o8 cmd: (___) 


LLL LL_L LLL LLL LE TS ET OS A SS HO ee NI ecco we cme eeee een eon 
LLLP LL__L LOLI D SS TEE ETE SE AACN a te eine asc pd te wee om ee 





Lime - 1.9906 


ON mes see eas a ee a 

Poror_oawe avo 4 
ee Oe OE Ee a Og 
ce a a re a Se a nn: a an a ee 


core ot mee came emew eens ewes came come ceee cone 


WEXT SPECIFICATION TYPE. ST. OR cmO- ; H 








own eeee come come wowe 


FO OLS OE OO OT OE OOOO ROR eewe ann ee on, 


LLL OO OL OO OO SS Oe Ae Oe ee Me meee ee eee ane 





_] | EXTENSION SPECIFICATION: 





2 1 2 3 3 
$7 3 3 5] 7 3.26 
awzeco £ ef 22 eeeewewes 2828 ee"e"2 eweees eee coe 
4446 5 £35 55 
3436 2 $6 7 8 (ComugaTs) 


REXT SPECIFICATION TYPE, ST. OR CMO: { 


ee mmm emer en neces em ee wwe em ce ww eee cece cece sceeus 
weet ewwweeee cee ono 22 eee enna. 
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[_} | FILE SPECIFICATION 
ae 





time - 1.6000 


PLrrr~12 2 22 33 

67 seve 4 33 12 

SC ateeetendond Ul Sse Se eS Se oe eee © oe 2 @ 
3 34 $5 6 6¢6¢ 77? 

$ $6 34 8 $73 @1 


oe ee 








L_} | FILE TRANSLATION SPECIFICATION 
Ee 





time ~ 1. be0¢ 


PRES LL tees cree wmee meee eens sane seme seme cere wees cere cee oo 

|e ee Oe Se eS | 
6 6 7 F 8 &8 & $ S$ © 8 8 4 4 2 2 
5s % 3 7? FY S$ S$ 3B F BF FS H SF F 2 


eames «oee come come wees eames coe cows come come meee cone ore ewww eee owe 


WEXT SPECIFICATEOS TYPE. ST. O8 CBB: (1) 






Sewn eter oe Se eee eee see ewe seme mee me. PD a0 SOP oD ee PPR SE 


eee an mwn meme wococoson SE SR SO OSS OSE Oe ee 








HEADER SPECIFICATION 


. om Posen 





time - 1.0008 
11 23466447 77 
1 e7a95 8 6rer23¢6 as 


swoes io «8 6 8 8 ee 8 ee wees & eswwes 


WEXT SPECIFICATION TYPE. ST. GO CHO: |¢ 


wow e ewww ene 2 0 2 ee en oe eee ee weer ee o 00 022 ee ee we wenn oe ween 20 owen eww cee = one 
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: my INPUT SPECIFICATION © 
@ =o § RECORD IDENTIFICATION 
P i) 





2 22 3.63 308 
1 $ 8 z $s 2 2 


owe owe cows ewe come coe « 


GEST SPECIFICATION TYPE. St, 98 cao: (3) 





INPUT SPECIFICATION 


FIELD DESCRIPTION 






a6 4 $§ 3 6 6 & 
i 6 34 8 23 9 1 3 Spmmzz 
eee BE Se oe Ee Seas: a Sceeen! eee Se ussee 
WEZT SPECIFICATION TYPE. $1. O8 cuO: (ow) 
oe ene ESSA eaten 
Padre Sanne eee ‘ 





1 2 2 3 3 
1 87 $ i] s 4 s 
we | ccecenwe enwee cecen aeece eoees acone 
‘4 4 $s 3 8 8 ? 
s am) ] s § 5 i 


—owwe eowee comes ewees comee comme comme 


BEIT SPECIFICATION TYPE, ST. O8 Cue: fo.) 


POLO CS OS OS ew ee Ss we we eee meee ee 
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SPERRY OS/3 A-11 
REPORT PROGRAM GENERATOR Il (RPG 8} EDITOR 


OUTPUT SPECIFICATION 
FILE IDENTIFICATION AND CONTROL 





Lime - 1.0806 


2 2 3 
33 &§ 8 2 


Prire 
1 ‘7 $8733 
ened: OE ec cees SoS el ee ee ea See ee ene 


BEXT SPECTFICATIOm TYPE. ST. OR CuB: {(__) 


eee wenn cece ee cee we ce eee eee eee ene eee ews ee cow eeeee sees ewes coe ewes cows 


‘ OUTPUT SPECIFICATION 
FIELD DESCRIPTION AND CONTROL 





LIME - 1.90900 


S (CONSTANT G2 EDIT WORD) 





SEIT SPECIFICATION TYPE, ST. @R CMO: (___) 


ewww we own mw PPS SOS OS SESS OOO E EEO ewe 


ew ow we re eer ee tee en POPE OP OSV SONS OSTEO CER ee 


TELECOMMUNICATION SPECIFICATION 





time - 1.8008 


trizeé 36s sé ? 
1 ‘7 seses 30s gs 1 
W eecees oo ee tieate Se: ca eases Coes 


REXT SPECIFICATION TYPE. ST. OR CuO: { 


EEK 


ea et ch Porn ronan 





ee mee <n een eee n ene e ee wee e eee ene wee eee cee ese e ee ener e cence“ wn nt cess ewseenwen 
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im AUTO REPORT OPTIONS SPECIFICATION 


tLe Ne Sree a. ree Sate arte 






AA ee tele ae? te 








Lime - 1.8008 


2 
1 678 . 7 


WERT SPECIFICATION TYPE. ST. of cmd: (___) 
8 0 0 6 0000 0 0.06 00 6 9 8880S 8 0 08 8 8 88 88 B80 8 OO CEO OA Owe ewe CeO TT 


wetesrspesesorsse oe erento se ee Senet ewes cee eer ew wees eneeweecowoewoecs 





Li@e - 1.9086 
1 


& (SPEC) 7 3 (LEGRARY mame) 
alee kt PEROT nc wwiicmecowe 
(COMMENTS) 






wees eee ce Cue oererss areas wes 


MEXIT SPECIFICATION TYPE. ST. O8 CBD: (__) 


A.3. SPECIFICATION SCREEN IN FREE-FORM FORMAT 


The following specification screen shows the free-form format.. 


(__] ] FREE-FORM FORMAT 





LIME - 1.0800 


1 2 3 4 5 6 
1234567890123656789022345678961234567898123456729812345678901234 


eee we 3 ce eee 0082 eee sone tee cower e cemeees cen weewer rer weowesoces 


WEXT SPECIFICATION TYPE. $7. OR CHO: ¢__) 


ee nr)! tt Tt ee ery 
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Appendix B. EDT Commands 


B.1. SUMMARY OF EDT COMMANDS 


Table B-1 summarizes the formats and explanations for the EDT 
commands. The commands are listed in alphabetical order. 


Table B-i. EDT Command Summary (Part 1 of 6) 


+ command 


a(t ine-rumber Paeel data } 


work-space file with a new 
String 


sco. [line-range]['*search- -string' {*n]] Copies fines in the 
TO Gestination current work-space file to 


new kne locations without 
deleting the original lines 


DELETE a) Cline-range]('search-string' [*#n}]} Erases specified lines from 
the current work-space file 


SFIk ‘search-string'[#n] Locates the first occurrence 
of a string in the 
work-space file and assigns 
its corresponding line number 
to the variable ? and the 
colurmn numbers of the first 
and last columns it occupies 
to [ and ] respectively 
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B=2 


Tabie B-1. EDT Command Surnmary (Part 2 of 6) 


you want a kst of moduses. use this format 


OFS CMODULE=20dule-nase] [-zePee{ geciter tree | 


'filename' 


7 EILENAM “(eaten 
“filename” 


(,ROPASS=password] 


,VSN=vol ume 


one | 
DISK 
SISKETIE 


INSERT @I 'change-string' [xn] 


LIST aL ({line-range} ['search-string' [er] ] IMMEDIATE] 


aM Cline-range]f'search-string' [en]] 
TO destination 


eee | ONU 'sequense-string'(eni[BY increment] 


aP [line-range]['search-string' [enr}] 
@PU [line-range:('search-string' [en]] (IMMEDIATE) 


To read a SA™ or SRAM liorars module from disk or format 
label cisaette ts te currer: wore-space file, use this format: 


@READ MODULE=mocul e-name [, TyPe=/ module-type i] 
& P. 


no 


Este 


+*filename' 
“filename” 


[:teuNer{ YES ,TILENAME=/f i lename | 


»ROPASS=pessword} ,VSN=volume 


DEVICE= ] 
DISKECTE 


cal-nesend-col-no 
-csi-neslest-col-nc 


- 


co. -nozetz-col-no } 





Creates in the work-space 
file a list of all modules 
contained in a specified 
program library 


Inserts a specified string 
imto lines in the current 
work-space file 


Prints specified lines 
from the current work-space 
file on the printer 


Transfers specified lines 

to new line locations in 

the work-space file and deletes 
the original lines and fine 
numbers 


Inserts sequence numbers 
inte input lines 


Displays specified lines 
from the current work-space 
file on the workstation screen 


Reproduces specified lines 
from the current work-space 
file on cards 


Reads a copy of a 

library module or program 
library into the work-space 
file 
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Table 8-1. EDT Commard Summary fart 3 of 6} 


SEE 
to te currem ‘work-space fe, use ths fionrat: 


@READ FILENAME= | filenane \" RDPASS=password] 


READ 
(eont) 


'Ffilename* 
“filename” 


,VSN=voLume [-xEMuO- ay | DEYICE= aig. | 
C,BESZ=n) ' TRUNC= (ey 


a{ (KEY=start-col -nczend-col-ne | 
KKEY=start-col-no:send-coi-no ; 
SHOWAfirst-col-noslast-cel-mo 


To read a unit record fie from a ama set labe! dske=tte 
or from the card reacer, use this formar: 


'filename' 


@READ Pee ia Conan ‘| ,VSN=volume 
“filename” 


ICEs(dic TRUNC=] YES. 
fas "{ugsere|[ (en H] 
RDR 


KKEY=start-col -nosend-coi -mo 
SHOWATirst-col-no:last-col-no 


“|{ee =start-col -nozend-col-ne 


To read a fae from a tzpe. use the forma 
GREAD eee iter eres 


‘ftlename' 
“filename” 


aia eas Ce \ +Skmoct test 
TAPE win | 


» TRUNC= Mal KEY=start-col -ns:end-col-no 
nO. i KkEY=estart-ccl -10:end-col-no 
S$H0wAfirst-ccl-no:last-ccel-no 
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Tadie B—1. EDT Command Summary (Part 4 of 6) 


READ 
(cont) 


@FEAD [JOB=jobname] eee 
N 
Y 


‘filename! 
“filenase” 


/SUEUE=(LOG ) rAuL= {x58 KTP ofa} 
PRINT ry : 
PUNCH 


ROR 


lau ! ilename i {,ACCT=acct-no] 


+ TRUNC={ TES} A[(KEY=start-col-no:end-col -no 
NS KKEY=start-col -nosend-col-no 


SHOWAfirst-col -noz:last-col-no 


Tc reac the same module or file last accessed throucn 
@ previoes DREAD or WRITE command. use this forme 


BEEAD 


Ts reac the same module or fie last accessed through 
@ previcus @READ or SVWAITE command but read now 
wth a KEY, KKEY, or SHOW: parameter or any valid 
EST command specifiec. use this format 


SEEAD4L;4] [KEY=start-col -nozend-col-no 
KKEY=start-col-no:end-col-no 
SHOW4first-col-nozlast-col -no 


[valid EDT command] 


Celet2s a specified 
szing from lines in 
te wor-space file 


iser=s sequence numbers 
F209 exissng lines m the 
csrremtt work-space file 


1S Cline-range]['search-string' [en}]J Cispiays specified lsnes 

f from the work-space fie 
ce 2% 2 time for you 
3 ect cr change 
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Table B-1. EDT Command Summary (Part 5 of G 


Se ts ee Se 
Toe sigs tata as 


To wre me current won space fie to a SAT or MIRAM 
liprary moduie on a disk or forma lade! diskene, use 
thus formac 


GARITE MOOULE=module-name jreelmescle-tyes) 
& 


‘filename! 
“filename” 


[Bel | 


,VSN=volume 


[' Se | [: mee 
fa) 


To write me current work-space fie 15 a MIRAM data file 
[Om @ cesk or format label diskette. use this format: 


smal fort po 


‘filename! 
“filename” 


el a 1G= FE} [2 
no J] 


pee site INIT= { tes i] Ge onl 


SeRITE FILENA eS (taytanae [oor 


a start-col-no:end-col -no 
(srant: col-no:end-col-no, 


,SIZE=n a 4] A RC=M= 


CT sesz=tn Bess fe BES=PI 
7 O53 


i 


To wme Mme current work-space fie to a unit record 
fie {i.e.. <3 Te printer, card puncs, or to a Gata 
s@: label asxette), use this format 


WRITE EILENAME=([filename | ,VSN=volume 
'filename' 
“filename” 
/RCFMSJFIX | ]£,RCSZ=n] 
TE IVAR 


LEUfee oe 


Y end 4 

OO DIK 

x sim 
4 


ad a 8 mo 
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Table B-1. EDT Command Summary (PartG6of6)  |™©~ 


WRITE 
(cont) this format: 


‘filename! 


@WRITE FILENAME= f ilename aaaiecaciciil 
“filename” 


,VSN=volume ,DEVICE=fdid } teBESzen] [, BKNO= és} 
TAPE L ; 


[,RESZ=n] [ait (e i 


To wrize the current work-space fie to the spool file, 
use this format: 


QWRITE [JOB=jobname] [: HOLD=| yest) 
NO 


‘filename! 


EEE ita | eakeniiiae 
“filename” 


,QUEUE=( PRINT) [, COPIES= {zn} 
PUNCH y 
ROR 


To write to the same moduie or file last accessed through 
a@ previous @READ or @WRITE command. use this format: 


QWRITE 


To wrice to the same moduie or file last accessed through 
a previous @READ or @WAITE command, but written to 
now with any valid EDT command specified, use this 
format: 





QWRITEA;Avalid EDT command 
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B.2. SUMMARY OF EDT PROCEDURE FILE COMMANDS 


Table B-2 summarizes the formats and explanations for the EDT 
procedure file commands. The commands are listed in alphabetical 
order. 


Table B-2. EDT Procedure File Command Summary 













a0 proc- oaamber PRINT 
NOPRINT 
. LUREVERT 


label 
line a procedure file 


@INP file-parameters| [PRINT 
NOPRINT 
REVERT 








Q@NOP [comment] 


RETURN QRET : Terminates procedure file 
pancaine 









UP-9981 SPERRY OS;3 8-3" 


REPORT PROGRAM GENERATOR & (RPG I} EDITOR 


B.3. SUMMARY OF EDT VARIABLE COMMANDS 
Table B-3 summarizes the formats and explanations for the EDT 
variable commands. The commands are listed in alphabetical order. 


Table B-3. EDT Variable Command Summary 












@AS Gn=/'string' [en] 
n(xsy) 


n{enj 





LEN(n) 




























DISPLAY 'string'({en] 


Displays a specified 


n(xsy) expression or the vawue 
nC+n) of a specified expression 
Ga 


from the work-space file 


LEN(n) on the workstation screen 






OIF. condition. command Permas an EDT command 
or EDT procedure file 
command tc be executed 


based on some condition 





or 


alr expression relation expression commend 


B.4. SUMMARY OF EDT DIRECTIVES 


Table B~4 summarizes the formats and explanations for the 
directives. The commands are listed in alphabetical order. 


oe ee eed we 


Tabie B-4. EDT Directive Summary (Part 1 of 2) 







Sa] 2 Seqplanaton—" sesee 
Determines # processed lines 
are to be csplayed 

on the workstation screen 


DROP Deletes a!! ines in the 
on entire EDT work-soace file 


Activates the error file processor 
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Tatrie B4. EDT Owective Summary (Fart 2 of 2) 


FORMAT OFT paranetear string (fer RPGEDT) Used only in conjunction 
ro) te. 3 ae (for COBEDT) with either RPGEDT or 
. COBEDT. See the appropriate 
subeditor manual for intormaton 
on the @FORMAT directive. 


Cc CT. 


as aad -character, 1 TABS=/ columns }] Defines various parameters 


to EDT that collectively 
make up your EDT 
-€,LINE=.engett [° ES>CLUDE={exclusion-character | environment 


[,A°S=Stecomnand-cr i ggerj[,COLON=range-separator] 


L,£s¢Disenc-esi amr] [, BUFFER= et 
TEE 


C,WiS~hedew ice-size] [, CLEAR? [:STRP= } 
OFF 


[,DiSPLt/] 


= ($C if SCROSPLYSTRUNCATE) 
/ BCif SCROSPLY=FOLD) 
4-15 


/RECENTIY= ee a [‘: SCRFORM= — H] 


SYSTEM OSY Cwortstat* or - command] ; Permits workstation commands 
= to be issued during 
an EDT session or 
temporarily returns you 
to system mode 
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B.5. SUMMARY OF EDT SCREEN COMMANDS 


Table B-5 summarizes the formats and explanations for the screen 
commands. ft lists the commands in alphabetical order. 


Tabie 8-5. Screen Command Summary 


screen that allows you 
to switch to block mode 
for ertering muhiple 
commands or data 


@EE Terror message coce) Displays heip screens for 
any EDT error messages 


Dispizys a screen 

showing the parameters on the 
SET dzrective (those that 
‘make up your EDT 
environment} 


‘ @>ROM [edt conmand] Displays the EDT command 
menu screen or help screens 
for amy of the EOT commands 
(mearing EDT commands, 
modifiers, directives, procedure 
fle commands, variables, and 
screen commands) 


Returns you to the point in 
your EDT session where you 
onginally entered a 

screen commend 


Displays freeform screens, 
showing the EDT work-space 
fie, where you can update 
imes cr sirmply view them 
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B.6. SUMMARY OF EFP COMMANDS 


Table B-6 summarizes the formats and explanations for the EFP 
commands. it lists the commands in alphabetical order, not the 
order in which you may necessarily use them. 


Table B-6. EFP Command Summary 


‘TO coer and Displays errors in your 
FORTRAN IV errors for one source module a a time, use: error file along with 
3 the source lines that 
@E=[XJe(program-unit-namejAé comtain those errors. 
{error-rangeJé Note that EFP is both 
C'search-string'] an EDT directive and 
an EFP command. 


To correct and display FORTRAN iV errors for cormpiations 
sna process multiple source modules, use: 


wEF SOL source-mocule-name, 
source-file-name, 
vsn 


END @E= ENS : ; Terminates the error 
: 3 file processor 


SUMMARY | SEF SUM Displays an error file 
summary for the module 
you're correcting 
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Appendix C. RPG II Directive Summary 


Table C-1 summarizes the formats and exrlanations of the RPG I! 
directives. The directives are listed in alphabetical order. 


Tabie C-1. RPG Ii Directive Summary 
/EJECT /JEJECT Causes sach specification 


ee] be ponted on a new ; 
sage ir the source listing 


/SPACEn /SPACEn * Comtrols spacing between 
ines ir source listing 
/TITLE /TITLEAtitte Prints 2 tithe heading 
at the mp ef the 
source ‘strnag 





i & 


UP-9981 


Term 


Activating editor 
RPG Il 


Alternate collating sequence 
specification screen 
pasitional format 
en 


Array/table delirniter 
specification screen 


Auto report options, specification 
screen 
formatted format 
positional format 
use 


Auto report (/COPY) 
formatted format 
positional format 
use 


Calculation spec“fication screen 
formatted icrmat 


positiona: format 


use 


REPORT PROGRA! 


Reference 


21 
21 


A2 
Table 2——} 


Table 2—] 


Al 
A2 
Table 2—-] 


Al 
A2 
Table 2—1 


3.1 
Al 
32 
A2 
Table 2—} 


Page 


2—1 
2—1 


A—7 
2—7 


2—7 


A—6 
A—12 
2—-7 


A—7 
A—12 
2—7 | 


3—9 
A—] 
3—18 
A—8 
2—7 


SPERRY OS/3 
M GENERATOR If (RPG I) EDITOR 


Term 


Command mode 


Commands 
abbreviations 
EDT 
EFP 
RPG Il 
style conventions 
use 


Comments, entering 


Compiling an RPG II program 


’ @CONTINUE 
Create mode 


remaining in update mode 
Selection - 

switching from update mode 
use 


Cursor movement keys 


Data, entering 


Index 1 

Index 
Reference Page 
See update 
mode. 
12 1—2 
B.1 B—] 
B.6 B—11 
42 4——3 
12 1—2 
Section 4 
See 
free-form/ 
comments 
specification 
screen. 
4.4 44 
42 4nG 
42 beh | 
2.2 2—3 
42 hee ; 
Section 3 ; 
Fig. l—1 1—3 
13 1—4 
See 
free-form/ 
comments 
specification 


screen. 
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Term Reference Page” 1 Term Reference Page 
Default values - 
initial display 22 2-2 F 
selection - 22 2—2 
Delimiter, table/array Table 2—1 2~7. | Fie —— — - a 
Directives _ _ Al A—2 
EDT Table B—4 B—8 positional format 32 3—16 
EFP Table B—§ B—Ii A2 Ao 
RPG Il Table C—1 C1 as Table 2-1 2—7 
Dispiay format ; 7 on Fis specetion screen ffle ; | 
es 32 314 positional format A A—9 
33 3—23 use Table 2—] 2—7 
duration 22 2—4 | - 
@FORMAT command 42 {3 Form types 33 3—21 
initial selection 22 —3 : 
ennonty free-form 3.1 33 @ FORMAT command 42 4—3 
| Format type, display 
changing 42 4—3 
description 22 2—3 
formatted - . 3.1 3—~1 
free-form 33 3~—20, 
.. initial selection 22 2—3 © 
positional 32 3—11 
temporary change 3.1 3—3 
3.2 3—13 
Formatted format ' 
descristion 22 2—4 | 
specification screens Al A—1 
E _ use 3.1 3~1 
DT’ é Free-form format | 
ivati i description > ae 2—5 
prota Tne = specification screen A h—12 
error detection/recovery 5.3 5—2 temporary use . 3—~3 
overview Ll 1~1 re 313. 
screen commands Table B—5 B—10 use . 3-20 
terminating 2.3 2—9 
work-space file 11 1—1 F amictiab josie 
i as format 21 36 
specification screen A3 A—12 
Bes rae , formatted displey 3.1 3—3 
Esuz2 specification screen use 
: mee 7 use, free-form 3.3 3—20 
pesitional format an os ee tise. general Table 2—] 2-7 
ie use, positional display 3.2 3—13 
Errer detection/recovery Section 5 
Exte"s:07 specification screen 
formatted format Al h—2 
Sasitional format A2 h—8 


use Table 2—] 2—7 
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Term ‘Reference Page Term Reference Page 
Input field specification screen 
. formatted 31 3—£ 
Al A—t 
_ posiional - . 32 3—18 
A2 A—10 
use ; Table 2—1 2~—7 
2 Input record specification screen 
G formatted 31 3-8 
. Al A—j 
feneral editor ; «See EDT. positional 32 317 
A2 A—i0 
use Table 2—1 2—7 
input specification form type 33 3—21 
H LE 
@HALT command . "| Line counter specification screen . ; 
examples 23 2—S | formatted format Al At 
33 - 3-27 positional format A A—10 
purpose 23 2—8 purpose Table 2—1 2—7 
Table B—4 B—9 : 
~ | Line numbers, work-space 
header specification screen changing during create mode 31 3—1 
first specification display 22 2—6 32 3—1] 
3.1 3—5 | 3.3 3~20 
formatted format 31 s6 changing during update mode 43 4—12 
Al A—3 description Ll - lm] 
position2! format 32 3—15 
A2 Aa Logon procedure 13 1—. 
use Table 2—1 2—7 
N 
Next screen identification line 
formztted display 3.1 3—~2 
free-form display 3.3 3—21 
i pesitonal display 32 3—21 
temporary free-form display 3.1 3 
ita: cispizy : 32 3—~13 
dese- stan 22 2—1 
iiusszcen 21 2—1 Next specifeation type 3.1 3—z 
3.1 3-5 32 gil . 
32 3—15 3.3 3—2Z1 
3.3 3—23 


Bars mg 22 2—6 GNOCHANSE 42 — 
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* Term Reference Page Term Reference Page 
Oo RPG Ii editor 
: activating 21 2—} 
Output field specification screen advantages ; 11 1—1 
o formatted format 31 3—10 Creating programs using Section 3 
Al A—5 rake Ll 1—l 
se terminating ; 23 2—35 - 
pesional format - a scdating propitt cand nha ‘ 
purpose Tabie 2—1 2-7 . 
RPG f! source programs, saving See @WRITE 
Output file specification screen command. 
formatted format 3.1 39 - ; 
; Al A—5 — | RPG Ii source programs, v4 
postional format 32 3—18 ili 
: AQ A~11 compiling 44 4—14 
purpose Tabe Z—1 2—7 
Output specification form type 33 321 
Ss 
Screen description 13 14 
P Screen mode processing Ll l—] 
Positional format Source statements 
description ’ 22 2—4 displaying 42 dane 
specification screens AZ A=? entering Section 3 . 
3Z 3—11 updating 42 4-7 
@PRINT command 42 4m Special commands 
; @FORMAT 42 4—3 
Procedure file commands Table B—2 B~7 @PRINT 42 43 
@UPDATE, definition 42 4—3 
Protected fieids 13 1—4 G@UPDATE, syntax £2 4—_7 
Specification screens 
illustrations Appendix A 
types Table 2—1  2—7— 
Specification type display vs 
screen description 22 2—6 
selection on imitial display 22 2—§ 
selection on specification 
R screens (ST} 32 3—15 
21 3—5 
ine 43 4m] use 3.1 3—5 
@READ command a sae 
are = arty | @STRIKE 42 4—8 
a oe Switex checking Li 1—] 
5.1 5—1 








. T 
Table/array delimiter specification 
Telecommunication specification screen 
formatted format 
positional format 
use 


Transmitting display 


_ Underscores 
Unprotected fields — 
@UPDATE command 

definition 

syntax 
Update mode 

description 

"selection on initial display 


switching from create mode 


use 


Updating RPG |! source programs © 
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Reference Page | Term Reference Page 
V 

Table2—1 2—7 | Variable commands Table 8-3 B—8 

Al A—6 

A2 A—11 

Table 2—1 2—7 

22 6 | 

3.1 3-3 : 

32 3—13 W 

33 : 3—23 Work-space file 
line numbers Ll loo] 
saving Ll l—2 
updating 1l 1—2 

Workstation considerations 

cursor movement 13 1—4 ° 
logon procedure 13 l—4 

13 1—4 screen displays 13 l-—4 

13 i— @WRITE command 3.1 3—10 

32 3—19 
33 3—27: 

42 4—3 43 413: 

42 4—7 . 

11 1—1 

22 28 

4.1 4] 

3.1 3—9 

32.—=« 3—17 

4.1 4—2 

Section 4 

Section 4 





